From 262bf22e84885ef87bfc2685a633b6d455216f4f Mon Sep 17 00:00:00 2001
From: jeffeaton <jeffrey.eaton@imperial.ac.uk>
Date: Sun, 17 Nov 2024 15:05:47 -0500
Subject: [PATCH] fix tests errors
---
tests/testthat/test-01-run-model.R | 2 +-
tests/testthat/test-03-model-fit.R | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/tests/testthat/test-01-run-model.R b/tests/testthat/test-01-run-model.R
index d3640372..f80d0bcc 100644
--- a/tests/testthat/test-01-run-model.R
+++ b/tests/testthat/test-01-run-model.R
@@ -205,7 +205,7 @@ test_that("exceeding max_iterations raises convergence warning", {
expect_length(out$warnings, 3)
expect_equal(out$warnings[[1]]$text,
- paste0("Naomi subnational data not equal to Spectrum national data. Check table on review inputs tab for: \nnumber_on_art: 2011;2012;2013;2014;2015;2016;2017;2018"))
+ paste0("Naomi subnational data not equal to Spectrum national data. Check table on review inputs tab for: \nnumber_on_art: 2011;2012;2013;2014;2015;2016;2017;2018;2019;2020;2021;2022;2023"))
expect_equal(out$warnings[[3]]$text,
paste0("Convergence error: iteration limit reached without convergence (10)"))
diff --git a/tests/testthat/test-03-model-fit.R b/tests/testthat/test-03-model-fit.R
index cadecde7..3046de77 100644
--- a/tests/testthat/test-03-model-fit.R
+++ b/tests/testthat/test-03-model-fit.R
@@ -86,7 +86,7 @@ test_that("model fits with different combination of ANC prevalence and ANC ART d
demo_survey_hiv_indicators,
anc_testing = ancdat1,
demo_art_number,
- prev_survey_ids = c("DEMO2016PHIA", "DEMO2015DHS"),
+ prev_survey_ids = "DEMO2016PHIA",
artcov_survey_ids = "DEMO2016PHIA",
recent_survey_ids = "DEMO2016PHIA",
anc_prev_year_t1 = 2016,