> library(twitteR)
Twitterの開発者としての登録(結構面倒)
このあたりから登録。 https://developer.twitter.com/
私の場合はここ。 https://developer.twitter.com/en/portal/projects/1293227305582510080/apps/18550830/keys
> CONSUMER_KEY <- "****"
> CONSUMER_SECRET <- "****"
> ACCESS_TOKEN <- "****"
> ACCESS_SECRET <- "****"
> setup_twitter_oauth(consumer_key = CONSUMER_KEY,
+ consumer_secret = CONSUMER_SECRET,
+ access_token = ACCESS_TOKEN,
+ access_secret = ACCESS_SECRET
+ )
[1] "Using direct authentication"
> searchTerm <-iconv("自殺したい OR 死にたい","CP932","UTF-8")
> tweets <- searchTwitter(searchTerm, n=10, locale = "ja")
> tw0 <- twListToDF(tweets)
> head(tw0)
text
1 あとスコップでフロントガラス傷だらけになって死にたい。\n街乗り用の軽ちゃんで良かったけども。
2 死にたいとか言うくらいなら燃やしてやるよ、安心しな
3 RT @minakosaring: とても混乱しています。\n死にたい気持ちが消えてくれない。\nずっと死に場所を探しています。\n\nごめんなさい。\nごめんなさい。\nごめんなさい。\n\n生きてて\nごめんなさい。 https://t.co/jsJOGL1ypq
4 化石PC(無線認識しなくなった)\nポケットWi-Fi(有線引けず)\nCoDアプリエラー\n\n死にたい
5 おっぱいに挟まれて死にたい
6 昨日めちゃめちゃ意味もなく殴られたんだけど。は?\nあと最近めっちゃ涙腺死んでる。\n何かあってもなくても泣いちゃう。\n明日から部活あるのに寝れなくて気づいたら朝でさ…。無理。パフォーマンス下がったら顧問に嫌味言われるし。死にたいよ。くそが
favorited favoriteCount replyToSN created truncated replyToSID
1 FALSE 0 <NA> 2021-01-03 03:11:49 FALSE <NA>
2 FALSE 0 <NA> 2021-01-03 03:11:45 FALSE <NA>
3 FALSE 0 <NA> 2021-01-03 03:11:33 FALSE <NA>
4 FALSE 0 <NA> 2021-01-03 03:11:28 FALSE <NA>
5 FALSE 0 <NA> 2021-01-03 03:11:23 FALSE <NA>
6 FALSE 0 <NA> 2021-01-03 03:11:14 FALSE <NA>
id replyToUID
1 1345568519094640640 <NA>
2 1345568503177220096 <NA>
3 1345568453155979265 <NA>
4 1345568432406740993 <NA>
5 1345568413339557889 <NA>
6 1345568374948917248 <NA>
statusSource
1 <a href="http://twitter.com/download/iphone" rel="nofollow">Twitter for iPhone</a>
2 <a href="http://twittbot.net/" rel="nofollow">twittbot.net</a>
3 <a href="http://twitter.com/download/android" rel="nofollow">Twitter for Android</a>
4 <a href="http://twitter.com/download/iphone" rel="nofollow">Twitter for iPhone</a>
5 <a href="http://twitter.com/download/iphone" rel="nofollow">Twitter for iPhone</a>
6 <a href="http://twitter.com/download/android" rel="nofollow">Twitter for Android</a>
screenName retweetCount isRetweet retweeted longitude latitude
1 etokimihusa 0 FALSE FALSE NA NA
2 kagejyosi_bot 0 FALSE FALSE NA NA
3 1jikuuline 1 TRUE FALSE NA NA
4 kingdom254 0 FALSE FALSE NA NA
5 chidusabu 0 FALSE FALSE NA NA
6 tukaen_0373 0 FALSE FALSE NA NA