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

correct for high-level abx

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2024-04-24 09:50:32 +02:00
parent 0d8a91db49
commit 25089e811e
4 changed files with 17 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@ -79,6 +79,16 @@ expect_equal(
# based on Levenshtein distance
expect_identical(ab_name("ceftazidim/avibactam", language = NULL), "Ceftazidime/avibactam")
expect_identical(as.character(as.ab(c("gentamicine High Level",
"gentamicine High",
"gentamicine (High Level)",
"gentamicine (High)",
"gentamicine HL",
"gentamicine H-L",
"gentamicine (HL)",
"gentamicine (H-L)"))),
rep("GEH", 8))
# assigning and subsetting
x <- antibiotics$ab
expect_inherits(x[1], "ab")