r、dplyr：如何使用 gsub 根据另一列中的值转换一列中的值

Question

我有一个具有两个（相关）因素的 dataframe，我想从另一个因素的值中删除一个等于一个因素的 substring，或者如果没有这样的 substring，则不理会它。 我可以使用dplyr做到这一点吗？

要制作 MWE，假设这些因素是x和y 。

library(dplyr)
df <- data.frame(x = c(rep('abc', 3)), y = c('a', 'b', 'd'))

df ：

      x y
1   abc a
2   abc b
3   abc d

我想要的是：

      x y
1    bc a
2    ac b
3   abc d

我的尝试是：

df |> transform(x = gsub(y, '', x))

但是，这会产生以下不正确的结果以及警告消息：

    x y
1  bc a
2  bc b
3  bc d

 Warning message:
 In gsub(y, "", x) :
    argument 'pattern' has length > 1 and only the first element will be used

我怎样才能做到这一点？

Answer 1

str_remove针对pattern而不是gsub进行矢量化

library(stringr)
library(dplyr)
df <- df %>% 
    mutate(x = str_remove(x, y))

-输出

df
    x y
1  bc a
2  ac b
3 abc d

---

如果我们想使用sub/gsub ，那么可能需要rowwise

df %>%
   rowwise %>%
   mutate(x = sub(y, "", x)) %>%
   ungroup