RでTwitterデータを取得してワードクラウド（TwitterAPI不要）

Twitterデータを取得

まずはTwitter用のパッケージとライブラリをインストール。

install.packages("rtweet")
library(rtweet)

検索機能で、探したいツイートのキーワードを入力して取得します。

“タピオカ”で検索。

tw <- search_tweets("タピオカ", include_rts=F,n=100)# リツイートを含めない場合はFALSE
View(tw)# データ

これをリストに入れます。

#リスト作成
tapiokaData <- c(tw$text)

では、テキストデータを使ってワードクラウドを作ります。

まずは必要なパッケージとライブラリをインストール。

install.packages("wordcloud")
library(wordcloud)

あと、日本語対応にするために、以下をラン。

par(family = "HiraKakuProN-W3")

では、ワードクラウド！！

wordcloud( tapiokaData, scale = c( 6, 1 ), min.freq = 10, max.words = Inf, random.order = FALSE, rot.per = .05, colors = brewer.pal( 8, "Dark2" ))

入ってはいけないリンクと見られるhttp~も入っちゃってますが、”タピ活”とか”ゴンチャ”とかが見えます。