Кажется, не удается заставить векторизованный gsub работать с библиотекой qdap и mgsub

Я смотрел на этот вопрос:

R: gsub, шаблон = вектор и замена = вектор

Я пробую простой пример, и я не могу заставить его работать.

testList <- c("apple", "orange", "banana1", "apple4", "orange 8", "banana 10")

repl <- c("apple", "orange", "banana")

pat <- paste0("^", repl, "[[:space:]]*[[:digit:]]*$")

result <- mgsub(pat, repl, testList)

Не должен ли этот вывод:

"apple", "orange", "banana", "apple", "orange", "banana"

r regex vectorization qdap
person confused_programmer    schedule 02.06.2017    source источник

Ответы (1)


arrow_upward
1
arrow_downward

Вам нужно указать fixed = FALSE, по умолчанию TRUE, который заменяет шаблон как есть и не использует регулярное выражение:

result <- mgsub(pat, repl, testList, fixed = FALSE)
result
# [1] "apple"  "orange" "banana" "apple"  "orange" "banana"
person Psidom    schedule 02.06.2017