Rで学ぶBag-of-Wordsによるテキストマイニング
Ted Kwartler
Instructor


# ベクターソースを作成: coffee_source coffee_source <- VectorSource(coffee_tweets)# 揮発性コーパスを作成: coffee_corpus coffee_corpus <- VCorpus(coffee_source)# 各種前処理関数を適用 tm_map(coffee_corpus, removeNumbers) tm_map(coffee_corpus, removePunctuation)tm_map(coffee_corpus, content_transformer(replace_abbreviation))
# 語幹化
stem_words <- stemDocument(c("complicatedly", "complicated","complication"))
stem_words
"complic" "complic" "complic"
# 単語辞書で補完
stemCompletion(stem_words, c("complicate"))
complic complic complic
"complicate" "complicate" "complicate"
# コーパス全体で補完
stemCompletion(stem_words, my_corpus)
Rで学ぶBag-of-Wordsによるテキストマイニング