diff options
Diffstat (limited to 'tests/testthat/test_residuals.R')
| -rw-r--r-- | tests/testthat/test_residuals.R | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/testthat/test_residuals.R b/tests/testthat/test_residuals.R index 35a143f6..e6e54dd5 100644 --- a/tests/testthat/test_residuals.R +++ b/tests/testthat/test_residuals.R @@ -7,4 +7,13 @@ test_that("Residuals are correctly returned", { expect_equivalent( residuals(f, standardized = TRUE)[1:3], c(-0.4171812, 1.4584875, -1.0472450), tolerance = 0.0001) + + expect_equivalent( + residuals(fit_obs_1, standardized = TRUE)[1:3], + c(-0.21771169, -0.33576060, 2.02836138)) + + expect_equivalent( + residuals(fit_tc_1, standardized = TRUE)[1:3], + c(-0.2474499, -0.3794267, 2.2749216), + tolerance = 1e-7) }) |