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

(v1.7.1.9028) fix unit test

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2021-08-20 00:08:31 +02:00
parent 41f35c73cd
commit e4de7f5055
7 changed files with 15 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
inst/tinytest/test-ab_property.R
View File

@ -24,7 +24,6 @@
# ==================================================================== #
expect_identical(ab_name("AMX", language = NULL), "Amoxicillin")
expect_identical(ab_name("AMX", language = NULL, snake_case = TRUE), "amoxicillin")
expect_identical(ab_atc("AMX"), "J01CA04")
expect_identical(ab_cid("AMX"), as.integer(33613))

6
inst/tinytest/test-mo_property.R
View File

@ -121,9 +121,9 @@ expect_equal(mo_name("test", reference_df = data.frame(col1 = "test", mo = "B_ES
"Escherichia coli")
if (AMR:::pkg_is_available("dplyr")) {
expect_equal(example_isolates %>% filter(mo_is_gram_negative()) %>% nrow(),
730)
730, tolerance = 0.5)
expect_equal(example_isolates %>% filter(mo_is_gram_positive()) %>% nrow(),
1238)
1238, tolerance = 0.5)
expect_equal(example_isolates %>% filter(mo_is_intrinsic_resistant(ab = "Vancomycin")) %>% nrow(),
710)
710, tolerance = 0.5)
}