diff --git a/man/demo_anc_testing.Rd b/man/demo_anc_testing.Rd index 573dd3cf..f5724c7b 100644 --- a/man/demo_anc_testing.Rd +++ b/man/demo_anc_testing.Rd @@ -31,7 +31,7 @@ TODO: Link to demo_areas dataset \item{\code{births_facility}}{Number of life births recorded at health facilities..} } -An object of class \code{tbl_df} (inherits from \code{tbl}, \code{data.frame}) with 510 rows and 10 columns. +An object of class \code{tbl_df} (inherits from \code{tbl}, \code{data.frame}) with 830 rows and 10 columns. } \source{ Department of HIV & AIDS, Minitry of Health, Malawi. diff --git a/tests/testthat/test-input-time-series.R b/tests/testthat/test-input-time-series.R index 18100f56..4b55aba2 100644 --- a/tests/testthat/test-input-time-series.R +++ b/tests/testthat/test-input-time-series.R @@ -130,7 +130,7 @@ test_that("ART data can be aggregated when avalible at different admin levels", dplyr::summarise(n = dplyr::n(), .groups = "drop") - expect_equal(unique(check2$n), 16) + expect_equal(unique(check2$n), 26) # (3) Data provided at more than one level for different years # Expected behavior - aggregate up from lowestnlevel available at each year @@ -387,7 +387,7 @@ test_that("ANC data can be aggregated when avalible at different admin levels", dplyr::summarise(n = dplyr::n(), .groups = "drop") - expect_equal(unique(check2$n), 8) + expect_equal(unique(check2$n), 13) # (3) Data provided at more than one level for different years # Expected behavior - aggregate up from lowest level available at each year