Заменить только разобранное регулярное выражение

Question

Этот вопрос аналогичен вопросу о стеке Regular expression parsed with grepl replacement.

Целью является разобрать регулярное выражение и заменить ТОЛЬКО совпадающий шаблон. Пример:

data <- c("cat 6kg","cat g250", "dog","cat 10 kg", "no cat") 

Для разбора матчей интерес cat:

data[grepl("cat",data)] 
[1] "cat 6kg" "cat g250" "cat 10 kg" "no cat" 

идеальный результат заменяет все вхождения cat с chicken:

[1] "chicken 6kg" "chicken g250" "chicken 10 kg" "no chicken" 

Любая идея, как добиться этого? Спасибо, парни.

Answer 1

Использование GSUB:

gsub("cat", "chicken", data) 

[1] "chicken 6kg" "chicken g250" "dog"   "chicken 10 kg" "no chicken" 

или если вы хотите только те, содержащие кошку:

gsub("cat", "chicken", data[grepl("cat",data)]) 

[1] "chicken 6kg" "chicken g250" "chicken 10 kg" "no chicken"