mirror of
https://github.com/msberends/AMR.git
synced 2025-07-08 11:11:54 +02:00
(v1.7.1.9066) mdro EUCAST v3.3
This commit is contained in:
4
R/mdro.R
4
R/mdro.R
@ -286,7 +286,7 @@ mdro <- function(x = NULL,
|
||||
}
|
||||
if (guideline == "eucast") {
|
||||
# turn into latest EUCAST guideline
|
||||
guideline <- "eucast3.2"
|
||||
guideline <- "eucast3.3"
|
||||
}
|
||||
if (guideline == "nl") {
|
||||
guideline <- "brmo"
|
||||
@ -294,7 +294,7 @@ mdro <- function(x = NULL,
|
||||
if (guideline == "de") {
|
||||
guideline <- "mrgn"
|
||||
}
|
||||
stop_ifnot(guideline %in% c("brmo", "mrgn", "eucast3.1", "eucast3.2", "tb", "cmi2012"),
|
||||
stop_ifnot(guideline %in% c("brmo", "mrgn", "eucast3.1", "eucast3.2", "eucast3.3", "tb", "cmi2012"),
|
||||
"invalid guideline: ", guideline.bak)
|
||||
guideline <- list(code = guideline)
|
||||
|
||||
|
Reference in New Issue
Block a user