P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2026-02-23 22:19:08 +01:00
Code Releases Activity

(v3.0.1.9021) add guideline to resistance() and susceptibility()

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2026-02-12 20:34:06 +01:00
parent 499c830ee7
commit 12cf144b19
14 changed files with 145 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
R/mean_amr_distance.R
View File

@@ -118,7 +118,7 @@ mean_amr_distance.disk <- function(x, ...) {
mean_amr_distance.sir <- function(x, ..., combine_SI = TRUE) {
meet_criteria(combine_SI, allow_class = "logical", has_length = 1, .call_depth = -1)
if (isTRUE(combine_SI)) {
x[x %in% c("I", "SDD")] <- "S"
x[x %in% c("I", "SDD")] <- "S" # do not acknowledge CLSI/EUCAST guideline here to keep the numeric mean_amr_distance consistent between systems
}
mean_amr_distance(as.double(x))
}