追加条件付きの特定の単語を含む行を削除するR

Question

「広告」または「マーケティング」も含まれていない限り、「プラン」という単語がキーワードに含まれる行を取り除きたいと考えています。具体的には、サンプルデータセットでは、 "hr計画"と "運用計画"を含むキーワードを含む行を削除する必要があります。

keyword <- c("advertising plan", 
       "advertising budget", 
       "marketing plan", 
       "marketing budget", 
       "hr plan", 
       "hr budget", 
       "operation plan", 
       "operation budget") 
indicator <- c(1,0,0,1,1,1,0,1) 
sample <- cbind(keyword,indicator) 

Answer 1

regexとstringrパッケージを使用して解決できる可能性があります。コメントで述べたように、私はindicatorをさらに2つの値に拡張しました。基本的にはkeywordの「計画」がないか、「広告」または「マーケティング」から始まる正規表現を検出したいと考えています。派手な正規表現を使用せずに、HTH

library("tidyverse") 
library("stringr") 

keyword <- c("advertising plan", 
      "advertising budget", 
      "marketing plan", 
      "marketing budget", 
      "hr plan", 
      "hr budget", 
      "operation plan", 
      "operation budget") 

indicator <- c(1,0,1,0,0,1,1,1) 

df <- data_frame(keyword,indicator) 

    df %>% 
    filter(!keyword %>% stringr::str_detect("plan") | 
      keyword %>% stringr::str_detect(pattern = c("^advertising|marketing"))) 

# A tibble: 6 × 2 
      keyword indicator 
       <chr>  <dbl> 
1 advertising plan   1 
2 advertising budget   0 
3  marketing plan   1 
4 marketing budget   0 
5   hr budget   1 
6 operation budget   1 

Answer 2

、私はおそらくちょうどあなたの2つのルールを組み合わせるために行くだろう：

sample[!(grepl("plan", sample[,"keyword"]) & 
     (!grepl("marketing|advertising", sample[,"keyword"]))),] 
#  keyword    indicator 
#[1,] "advertising plan" "1"  
#[2,] "advertising budget" "0"  
#[3,] "marketing plan"  "0"  
#[4,] "marketing budget" "1"  
#[5,] "hr budget"   "1"  
#[6,] "operation budget" "1"