基於來自另一個表的搜索字符串的R更新表列

Question

我試圖根據同一個表中的單元格A的值更新表中的單元格B.要過濾我要更新的行，我正在使用grepl將單元格A與列表/表格/矢量或某些其他外部源的字符串列表進行比較。對於單元格A與搜索條件匹配的所有行，我想更新單元格B以表示「xxxx」。我需要爲我的表中的所有行執行此操作。

到目前爲止，我有這樣的東西，其中cat1是某種有字符串搜索的列表。

for (x in 1:length(cat1)){ 
    data %<>% mutate(Cat = ifelse(grepl(cat1[i],ItemName),"xxx",Cat)) 
} 

我願意接受任何更好的方法來完成這一點。我已經嘗試了與數據框的循環，並且我開放給data.table解決方案。

謝謝。

Answer 1

爲了避免循環，可以用|摺疊字符向量，然後使用它作爲在grepl單個圖案，例如可以嘗試：

cat1_collapsed <- paste(cat1, collapse = "|") 
data %>% mutate(Cat = ifelse(grepl(cat1_collapsed, ItemName),"xxx", Cat)) 

或同等使用data.table（當然或鹼R） 。

Answer 2

使用以下代碼假設你有稱爲「數據」與列「A」和「B」，並且將數據幀「CAT1」是所希望的字符串的載體，如所描述

library(data.table) 
setDT(data) 
data[A %in% cat1,B:="XXXX"]