allow column name for ab in as.sir()

2025-09-04 12:09:37 +02:00 · 2024-05-20 21:29:13 +02:00
parent fc269e667d
commit d214f74e25
10 changed files with 139 additions and 106 deletions
--- a/R/count.R
+++ b/R/count.R
@@ -135,7 +135,7 @@ count_resistant <- function(..., only_all_tested = FALSE) {
 count_susceptible <- function(..., only_all_tested = FALSE) {
  tryCatch(
    sir_calc(...,
-      ab_result = c("S", "I"),
+      ab_result = c("S", "SDD", "I"),
      only_all_tested = only_all_tested,
      only_count = TRUE
    ),