peut sembler ne pas se vectorisé gsub travailler avec la bibliothèque « qdap » et mgsub

Question

Je regardais cette question:

R: gsub, pattern = vector and replacement = vector

J'essaie un exemple simple et je ne peux pas l'obtenir à travail.

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) 

Si pas cette sortie:

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

Answer 1

Vous devez spécifier fixed = FALSE, la valeur par défaut est TRUE, qui remplace le modèle tel qu'il est et ne pas utiliser regex:

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