根据与 dplyr 的部分匹配替换数据框中任意位置的整个字符串

我正在努力寻找合适的 dplyr 代码来使用grepl或等效的方法来替换整个数据帧中的值。

即：任何包含“mazda”的单元格都应将其全部内容替换为新字符串“A car”

经过大量在线搜索后，我最接近的是：

重点是将其应用于所有列。

library(dplyr)
mtcars$carnames <- rownames(mtcars)  # dummy data to test on

这行代码可以使整个刺痛完全匹配：

mtcars %>% replace(., (.)=='Mazda RX4', "A car")

但出于某种原因，我的 grepl 尝试将整个列替换为“A car”。

mtcars %>% replace(., grepl('Mazda', (.)), "A car")

library(dplyr)
mtcars %>% mutate_if(grepl('Mazda',.), ~replace(., grepl('Mazda', .), "A car"))

首先要了解你为什么replace未能看出两者之间的区别'Mazda RX4'==mtcars and grepl('Mazda', mtcars)，自从你使用grepl, replace uses

Replace 将 x 中的值替换为 list 中给定的索引值。如果需要的话，values中的值会被回收。

现在，如果我们确保使用以下方法获得合适的输出，我们可以使用您的第一种方法sapply例如

mtcars %>% replace(., sapply(mtcars, function(.) grepl('Mazda',.)), "A car")

Update:

要替换我们可以使用的多种模式stringr::str_replace_all

library(stringr)
library(dplyr)
mtcars %>% mutate_if(str_detect(., 'Mazda|Merc'), 
                    ~str_replace_all(., c("Mazda.*" = "A car", "Merc.*" = "B car")))