P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2026-03-11 17:47:50 +01:00
Code Releases Activity

(v3.0.1.9030) fix R 3.6

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2026-03-07 18:07:24 +01:00
parent 9af726dcaa
commit e2102c081a
4 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
tests/testthat/test-data.R
View File

@@ -35,7 +35,10 @@ test_that("test-data.R", {
expect_identical(class(microorganisms$mo), c("mo", "character"))
expect_identical(nrow(antimicrobials), length(unique(AMR::antimicrobials$ab)))
expect_identical(class(AMR::antimicrobials$ab), c("ab", "character"))
expect_identical(nrow(antimicrobials[!is.na(antimicrobials$cid), ]), length(unique(AMR::antimicrobials$cid[!is.na(antimicrobials$cid)])), label = "nr of rows with CIDs", expected.label = "unique nr of CIDs")
expect_identical(
nrow(antimicrobials[!is.na(antimicrobials$cid), ]),
length(unique(AMR::antimicrobials$cid[!is.na(antimicrobials$cid)]))
)
# check cross table reference
expect_true(all(microorganisms.codes$mo %in% microorganisms$mo))