R: 对向量中的每一个元素,检查其是否包含某个“单词”

#检测一个字符串中,是否包含某个子串,是返回T,否返回Frequire(stringr)oop

require(stringr)
test <- c("这里有天气热敏感冒","好天气","感冒了,也要加油","感?冒","","不是","感冒?不是!")
str_detect(test,"感冒")

num_dec <- 0;loops <-1
while(loops <= length(test)){
  if(is.na(test[loops])){
    loops = loops + 1
  }else{
    if(str_detect(test[loops],"感冒")){
      num_dec = num_dec + 1
      print(loops) 
      loops = loops + 1
    }else{loops = loops + 1}
  }
}
print(num_dec)

  

  输出结果有:print(loops)为包含“感冒”这个词的元素 的坐标。print(num_dec):为总共包含这个词的元素的个数ui