1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-09 17:02:03 +02:00

fix for antibiogram(), transform WHONET data set to sir

This commit is contained in:
2023-02-22 15:40:05 +01:00
parent dad25302f2
commit c2cfc5ef84
10 changed files with 20 additions and 30 deletions

2
R/ab.R
View File

@ -249,8 +249,6 @@ as.ab <- function(x, flag_multiple_results = TRUE, info = interactive(), ...) {
next
}
print("here")
# length of input is quite long, and Levenshtein distance is only max 2
if (nchar(x[i]) >= 10) {
levenshtein <- as.double(utils::adist(x[i], AMR_env$AB_lookup$generalised_name))