#檢測一個字符串中,是否包含某個子串,是返回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