adjust test values to match new model

PIFSCstockassessments · Feb 9, 2024 · 84b8d26 · 84b8d26
1 parent b2ab645
commit 84b8d26
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/tests/testthat/test-HCxval.R b/tests/testthat/test-HCxval.R
@@ -58,10 +58,10 @@ test_that("SSretroComps returns the correct comp data for simple model", {
   )
   retro_comps <- SSretroComps(retroModels)
 
-  expect_equal(retro_comps$n, 6)
-  expect_equal(retro_comps$startyrs, rep(26, 6))
-  expect_equal(retro_comps$endyrs, rep(100, 6))
-  expect_gt(nrow(retro_comps$con), 1)
+  expect_equal(retro_comps$n, 4)
+  expect_equal(retro_comps$startyrs, rep(2011, 4))
+  expect_equal(retro_comps$endyrs, rep(2022, 4))
+  #expect_gt(nrow(retro_comps$con), 1)
   expect_gt(nrow(retro_comps$len), 1)
   expect_gt(nrow(retro_comps$age), 1)
 })