R grepl内循环

Question

你好，我想给包含特定字符串的行添加一个特定值。例如，这是可行的：

df[grepl("acting", df$Q), "QG"] <- "SP"
df[grepl("did not", df$Q), "QG"] <- "SP"
df[grepl("Somehow", df$Q), "QG"] <- "SP"

然而，我想把所有的东西都放在一个循环中，以减少代码。这不起作用(我不知道为什么)

assignSubgroup <- function(keywords, group){
  for(k in keywords){
    df[grepl(k, df$Q), "QG"] <- group
  }
}

assignSubgroup(c("acting", "did not", "Somehow"), "SP")

它不会抛出错误，但对数据帧没有任何影响。问题出在哪里？谢谢

Answer 1

使用基数R，不使用函数或循环：

df$QC[grepl("acting|did not|Somehow", df$Q)] <- "SP"