diff options
Diffstat (limited to 'tests/testthat/test_residuals.R')
| -rw-r--r-- | tests/testthat/test_residuals.R | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/testthat/test_residuals.R b/tests/testthat/test_residuals.R index 275b33b9..35a143f6 100644 --- a/tests/testthat/test_residuals.R +++ b/tests/testthat/test_residuals.R @@ -4,5 +4,7 @@ test_that("Residuals are correctly returned", { f <- fits[["FOMC", "FOCUS_C"]] expect_equal(residuals(f)[1:3], c(-0.7748906, 2.7090589, -1.9451989)) - expect_equivalent(residuals(f_tc_2, standardized = TRUE)[1:3], c(0.52579103, 0.40714911, 1.66394233), tolerance = 0.0001) + expect_equivalent( + residuals(f, standardized = TRUE)[1:3], + c(-0.4171812, 1.4584875, -1.0472450), tolerance = 0.0001) }) |