mirror of
https://github.com/msberends/AMR.git
synced 2025-08-27 19:12:09 +02:00
(v2.1.1.9041) antibiotics update
This commit is contained in:
@@ -244,6 +244,7 @@ translate_into_language <- function(from,
|
||||
# starting with longest pattern, since more general translations are shorter, such as 'Group'
|
||||
order(nchar(df_trans$pattern), decreasing = TRUE),
|
||||
function(i) {
|
||||
if (df_trans$pattern[i] %like% "[/]") return(df_trans$pattern[i])
|
||||
from_unique_translated <<- gsub(
|
||||
pattern = df_trans$pattern[i],
|
||||
replacement = df_trans[i, lang, drop = TRUE],
|
||||
|
Reference in New Issue
Block a user