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

(v.1.5.0.9000) implementation of EUCAST rules v11 (2021)

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2021-01-12 22:08:04 +01:00
parent 3b84b8be75
commit d014955ce0
93 changed files with 3631 additions and 374 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
data-raw/reproduction_of_antibiotics.R
View File

@ -606,6 +606,20 @@ antibiotics <- antibiotics %>%
TRUE ~ group))
antibiotics[which(antibiotics$ab %in% c("CYC", "LNZ", "THA", "TZD")), "group"] <- "Oxazolidinones"
# add pretomanid
antibiotics <- antibiotics %>%
mutate(ab = as.character(ab)) %>%
bind_rows(antibiotics %>%
mutate(ab = as.character(ab)) %>%
filter(ab == "SMF") %>%
mutate(ab = "PMD",
atc = "J04AK08",
cid = 456199,
name = "Pretomanid",
abbreviations = list(""),
oral_ddd = NA_real_))
# update DDDs from WHOCC website
ddd_oral <- double(length = nrow(antibiotics))
ddd_iv <- double(length = nrow(antibiotics))