P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-12 17:01:57 +02:00
Code Releases Activity

(v2.1.1.9087) update unit tests

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2024-10-04 15:28:44 +02:00
parent 738689beea
commit 9fb891eee2
5 changed files with 34272 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
inst/tinytest/test-first_isolate.R
View File

@ -206,7 +206,7 @@ expect_equal(
),
na.rm = TRUE
),
1376
1390
)
# unknown MOs
@ -214,23 +214,23 @@ test_unknown <- example_isolates
test_unknown$mo <- ifelse(test_unknown$mo == "B_ESCHR_COLI", "UNKNOWN", test_unknown$mo)
expect_equal(
sum(first_isolate(test_unknown, include_unknown = FALSE)),
1106
1116
)
expect_equal(
sum(first_isolate(test_unknown, include_unknown = TRUE)),
1589
1599
)
test_unknown$mo <- ifelse(test_unknown$mo == "UNKNOWN", NA, test_unknown$mo)
expect_equal(
sum(first_isolate(test_unknown)),
1106
1116
)
# empty sir results
expect_equal(
sum(first_isolate(example_isolates, include_untested_sir = FALSE)),
1360
1374
)
# shortcuts