Grepl in for do循环,通过传递字符串

时间:2017-05-25 13:54:54

标签: r

mdma4 <- unique(mdma4)    
output <- c()
for (i in 1:length(mdma4)){
  m <- (mdma4[i])
  result <- mdma$MRP.Area[grepl('m', mdma$Material)]
  if (length(result) == 0 ){
    print('in if')
    output <- c(output, result)
  }
}

mdma4包含vector:c("A", "B", ...)mdma是包含2列的数据框。

我正在尝试将mdma4中的字符串传递给mdma$Material,并从mdma$MRP中找到相应的条目。区域 但是grepl代码不从相应的列中获取数据。

它是循环外的部分字符串匹配,下面的代码可以正常工作,但是如果它是for for循环,则不起作用。

test <- mdma$MRP.Area[grepl("GK180", mdma$Material)]

2 个答案:

答案 0 :(得分:0)

目前尚不清楚您是否正在寻找完整的字符串或部分字符串匹配。以下之一应该有效:

mdma$MRP.Area[grepl(m, mdma$Material)] #remove quotes around m

mdma$MRP.Area[grepl(mdma4[i], mdma$Material)] #not creating variable m

mdma$MRP.Area[mdma$Material == mdma4[i]] #full string match

仅供参考,缺少结束}

答案 1 :(得分:0)

以下所有内容都不起作用,当它在内部循环中时 但是在for循环之外工作

mdma$MRP.Area[grepl(m, mdma$Material)] #remove quotes around m

mdma$MRP.Area[grepl(mdma4[i], mdma$Material)] #not creating variable m

mdma$MRP.Area[mdma$Material == mdma4[i]]