模式（g）sub =列中的字符串（R）

Question

我现在正在寻找很长一段时间，但是我无法弄清楚如何替换字符串的实体，其中模式是列中的字符串，并且每行都不同。所以我有这些数据：

         var1                         var2                var3
"Sentence 1 is exiting, isnt it?"  "exiting"         
"Sentence 2 is boring, isnt it?"   "boring"

我最终想要这个：

         var1                        var2                   var3
"Sentence 1 is exiting, isnt it?"  "exiting"         "Sentence 1 is, isnt it?"
"Sentence 2 is boring, isnt it?"   "boring"          "Sentence 2 is, isnt it?"

因此，在每一行中都有另一种需要替换的模式。如果我做var3 = gsub（var2，＆＃34;＆＃34;，var1）我得到一个错误，因为var2不是表达式。

谁能帮帮我？

Answer 1

使用mapply：

df <- data.frame(var1= c("Sentence 1 is exiting, isnt it?","Sentence 2 is boring, isnt it?"), var2=c("exiting","boring"))


df$var3 <- mapply(gsub, pattern=df$var2, x=df$var1, replacement="")

mapply将函数gsub应用于pattern和x的第一个元素，然后应用于第二个元素等。