Twitterデータの抽出
Rで学ぶソーシャルメディアデータ分析
Sowmya Vivek
Data Science Coach
レッスン概要
- API の基本
- Twitter API の種類
- R環境のセットアップ
- Twitter からのデータ抽出
APIの説明
- Application Programming Interface（API）
- 2つのアプリが相互にやり取りするための仲介ソフトウェア
- Twitter API はTwitterと連携しツイート取得を支援
APIベースのサブスクリプション
APIベースのサブスクリプション
R設定の前提条件
- PCでRを設定する前提条件
- Twitterアカウント
- ブラウザのポップアップブロッカーを無効化
- 対話型Rセッション
- Rに
rtweetとhttpuvをインストール
- DataCamp では前提条件はすべて設定済み
rtweet と httpuv パッケージ
R環境の設定
- お使いのPCでR環境を設定する手順
rtweetとhttpuvライブラリを有効化- 検索クエリで
search_tweets()を実行し Twitter に接続 - ブラウザのポップアップで認可
- 「Authentication complete」でアクセス許可を確認
- DataCamp ではR環境は既に設定済み
Twitterデータ抽出: search_tweets()
search_tweets()は検索クエリに合致するTwitterデータを返します- 直近7日分のツイートのみ
- 1リクエストあたり最大18,000件
# rtweet ライブラリを読み込み
library(rtweet)
# "#gameofthrones" のツイートを search_tweets() で抽出
tweets_got <- search_tweets("#gameofthrones", n = 1000, include_rts = TRUE, lang = "en")
Twitterデータ抽出: search_tweets()
head(tweets_got, 4)
user_id status_id created_at screen_name text
<chr> <chr> <S3: POSIXct> <chr> <chr>
727816588171350017 1176103860554915841 2019-09-23 11:59:45 LeonardoUzcat1 Today.\n\n#GameofThrones has won Outstanding Drama Series at this year's #Emmys. https://t.co/YHlqvmKxLF
363838927 1176103859464396806 2019-09-23 11:59:45 mariaaa_carmen We break the wheel together.\n\n#GameofThrones has been awarded 12 #Emmys, the most of any program this year. https://t.co/gTYq8JWCtD
881880538461618176 1176103856163434497 2019-09-23 11:59:44 _valkyriez The #Emmys had their chance with Lena for Seasons 5 & 6 and they blew it. It happens. However, the work Lena Heady brought to the role of Cersei Lannister will never go unnoticed in our hearts & memories. One of the great villains & characters in TV history. #GameOfThrones https://t.co/vpznpzAMsP
521127287 1176103856075431936 2019-09-23 11:59:44 Nudeus Congrats to #GameofThrones (60%), the most nominated show in a single season. It wins this year’s #Emmy for Outstanding Drama Series. https://t.co/lSoQE6PjDY https://t.co/IUR6kkI5FL
Twitterデータ抽出: get_timeline()
get_timeline()は特定ユーザーの投稿ツイートを抽出- 最大3200件を返します
# get_timeline() で Katy Perry のツイートを抽出
gt_katy <- get_timeline("@katyperry", n = 3200)
Twitterデータ抽出: get_timeline()
# 出力を表示
head(gt_katy)
user_id status_id created_at screen_name text
<chr> <chr> <S3: POSIXct> <chr> <chr>
21447363 1175132444103565312 2019-09-20 19:39:42 katyperry My baby angel @cynthialovely is a MOOD. #MoodSwing EP is out now! 👼Angel’s👼 my favorite - which one is yours? https://t.co/VDgri3RYQv https://t.co/XhgCHTJG2o
21447363 1175033932355649536 2019-09-20 13:08:15 katyperry CHICAGO! I’m going to make it a Cozy Little Christmas with you (and @Camila_Cabello, @marshmellomusic, @Normani, @OfficialMonstaX, @liltecca, @ajmitchell, and @NCTsmtown_127) when I see you at the @B96Chicago #JingleBash on December 7! Get your 🎟 here: https://t.co/gBEaNYiZyR https://t.co/Qc5FjR28ti
21447363 1174461907656273920 2019-09-18 23:15:13 katyperry I still dress like a child to offset adulting 😩😩😩 https://t.co/dvzJBTL5G6
21447363 1174428616735756288 2019-09-18 21:02:56 katyperry watch me perform 🎶Small Talk🎶 on theellenshow today for clear skin ✨ @ The Ellen Show https://t.co/WpLUl33YiA
21447363 1174381476227338240 2019-09-18 17:55:37 katyperry 🎶 #SmallTalk 🎶 with my friend @TheEllenShow TODAY. Ch
21447363 1174061536580497409 2019-09-17 20:44:17 katyperry Make a 🌈 connection with @katyperrycollections this #Shoe
練習しましょう！
Rで学ぶソーシャルメディアデータ分析
