P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-07-08 11:11:54 +02:00
Code Releases Activity

(v1.6.0.9017) extra system codes

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2021-05-04 12:47:33 +02:00
parent f33e61bac7
commit 5679ccdaf9
32 changed files with 98 additions and 133 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
tests/testthat/test-eucast_rules.R
View File

@ -149,7 +149,8 @@ test_that("Custom EUCAST rules work", {
skip_on_cran()
x <- custom_eucast_rules(AMC == "R" & genus == "Klebsiella" ~ aminopenicillins == "R",
AMC == "I" & genus == "Klebsiella" ~ aminopenicillins == "I")
AMC == "I" & genus == "Klebsiella" ~ aminopenicillins == "I",
AMX == "S" ~ AMC == "S")
expect_output(print(x))
expect_output(print(c(x, x)))
expect_output(print(as.list(x, x)))