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

revert back to pre-antibiogram

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2023-02-09 13:07:39 +01:00
parent aa48c6bf53
commit 1a0dc4bf46
53 changed files with 984 additions and 1996 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
R/translate.R
View File

@ -244,10 +244,9 @@ translate_into_language <- function(from,
if (NROW(df_trans) == 0 | !any_form_in_patterns) {
return(from)
}
lapply(
# starting from last row, since more general translation are on top, such as 'Group'
rev(seq_len(nrow(df_trans))),
seq_len(nrow(df_trans)),
function(i) {
from_unique_translated <<- gsub(
pattern = df_trans$pattern[i],