mirror of
https://github.com/msberends/AMR.git
synced 2025-07-12 15:02:00 +02:00
new antibiotics
This commit is contained in:
@ -24,15 +24,15 @@ context("guess_ab_col.R")
|
||||
test_that("guess_ab_col works", {
|
||||
|
||||
expect_equal(guess_ab_col(septic_patients, "amox"),
|
||||
"amox")
|
||||
"AMX")
|
||||
expect_equal(guess_ab_col(septic_patients, "amoxicillin"),
|
||||
"amox")
|
||||
"AMX")
|
||||
expect_equal(guess_ab_col(septic_patients, "J01AA07"),
|
||||
"tetr")
|
||||
"TCY")
|
||||
expect_equal(guess_ab_col(septic_patients, "tetracycline"),
|
||||
"tetr")
|
||||
"TCY")
|
||||
expect_equal(guess_ab_col(septic_patients, "TETR"),
|
||||
"tetr")
|
||||
"TCY")
|
||||
|
||||
df <- data.frame(AMP_ND10 = "R",
|
||||
AMC_ED20 = "S")
|
||||
|
Reference in New Issue
Block a user