mirror of
https://github.com/msberends/AMR.git
synced 2025-07-09 02:03:04 +02:00
(v1.2.0.9020) ab_from_text() improvement
This commit is contained in:
@ -94,7 +94,7 @@ ab_from_text <- function(text,
|
||||
stop_if(length(type) != 1, "`type` must be of length 1")
|
||||
|
||||
text <- tolower(as.character(text))
|
||||
text_split_all <- strsplit(text, "[ ;.,:/\\|-]")
|
||||
text_split_all <- strsplit(text, "[ ;.,:\\|]")
|
||||
|
||||
if (type %like% "(drug|ab|anti)") {
|
||||
|
||||
|
Reference in New Issue
Block a user