同義語を検出してデータフレームに保存します

Question

私はあらかじめ定義された単語/フレーズを持つデータフレームを持っています。

例：多数の行と一つの列を有し、すべての行のテキストがある DF $項

stock 
revenue 
continuous improvement 

別のデータフレーム（DF2）。私はそれを作るための任意の簡単な方法があります行ごとに用語を検出し、この

row_number, stock, continuous improvement, revenue 
1,1,0,1 
2,1,0,0 
3,0,1,0 

のような出力なものとして持っていたいと思いDFからの用語を用いて、実施例 DF2の$文

I used to study at university and in my free time observe the stock prices. Additionally the revenue of every stock 
Stock market is my first interest 
I always try to continuous improvement 

？次のように

Answer 1

あなたがこれを行うことができます：

# Create some fake data 
words <- c("stock", "revenue", "continuous improvement") 
phrases <- c("blah blah stock and revenue", "yada yada revenue yada", 
      "continuous improvement is an unrealistic goal", 
      "phrase with no match") 

# Apply the 'grepl' function along the list of words, and convert the result to numeric 
df <- data.frame(lapply(words, function(word) {as.numeric(grepl(word, phrases))})) 
# Name the columns the words that were searched 
names(df) <- words 
df 
    stock revenue continuous improvement 
1  1  1      0 
2  0  1      0 
3  0  0      1 
4  0  0      0 

私はここに行番号を持つ別の変数を作成していないが、あなたは常に追加することができ、あなたが​​とそれを必要に応じています。