Twitterのトレンド

Rで学ぶソーシャルメディアデータ分析

Vivek Vijayaraghavan

Data Science Coach

レッスンの概要

Twitterトレンドを理解
トレンドトピックを抽出
参加・エンゲージメントに活用

Twitterトレンドとは

今人気のキーワード、イベント、話題
急上昇のテーマを発見
いくつかはハッシュタグ付き
ハッシュタグで関連会話を検索しやすい
地域トレンドで特定地域の話題を特定

Twitterトレンドを活用する

マーケ情報をトレンドに乗せる
トレンドはエンゲージメント向上に有効
旅行サイトは「#TravelTuesday」で投稿

世界のトレンドを抽出

# 全体の現在のトレンドを取得
trend_topics <- get_trends()
head(trend_topics$trend, 10)

 [1] "#madebygoogle"         "#あなたとHしたい人の数"
 [3] "西田くん"                "Jennifer Aniston"      
 [5] "#ワールドカップバレー"     "#FelizMartes"          
 [7] "#G線上のあなたと私"       "西田選手"              
 [9] "피디수첩"                "タジキスタン"

特定地域のトレンドに絞ると有用性が高い

現在トレンドがある場所

# 取得可能なトレンドの場所を抽出
trends_avail <- trends_available()
head(trends_avail)

name                        url                          parentid    country
<chr>                      <chr>                           <int>      <chr>
Worldwide     http://where.yahooapis.com/v1/place/1            
Winnipeg      http://where.yahooapis.com/v1/place/2972    23424775    Canada
Ottawa        http://where.yahooapis.com/v1/place/3369    23424775    Canada    
Quebec        http://where.yahooapis.com/v1/place/3444    23424775    Canada    
Montreal      http://where.yahooapis.com/v1/place/3534    23424775    Canada    
Toronto       http://where.yahooapis.com/v1/place/4118    23424775    Canada

国別のトレンド

# 米国のトレンドを取得
gt_US <- get_trends("United States")

国別のトレンド

View(gt_US)

米国のトレンド

音楽動画会社は「hashtagRockHall2020」でプロモーション可能

都市別のトレンド

特定の都市のトレンドを取得
該当トレンド周辺のツイートを収集

# ニューヨークのトレンドを取得
gt_city <- get_trends("New York")

都市別のトレンド

head(gt_city)

trend                            url                        promoted_content
<chr>                           <chr>                             <lgl>
Lions            http://twitter.com/search?q=Lions                  NA    
Green Bay        http://twitter.com/search?q=%22Green+Bay%22        NA    
#DETvsGB         http://twitter.com/search?q=%23DETvsGB             NA    
LeBron           http://twitter.com/search?q=LeBron                 NA    
Aaron Rodgers    http://twitter.com/search?q=%22Aaron+Rodgers%22    NA    
#90DayFiance     http://twitter.com/search?q=%2390DayFiance         NA

バスケ用品の販促に活用可能

ツイート数が多いトレンド

tweet_volume はトレンドのツイート数
一部のトレンドでのみ利用可能
最も多くツイートされたトレンドを特定

ツイート数が多いトレンド

# トレンドとツイート数を集計
library(dplyr)
trend_df <- gt_city %>%
              group_by(trend) %>%
              summarize(tweet_vol = mean(tweet_volume))

ツイート数が多いトレンド

head(trend_df)

trend                  tweet_vol
<chr>                    <dbl>
#90DayFiance             14375            
#acefamilyisoverparty    12760            
#ascendwithme            NA            
#bbcon2019               NA            
#bookbirthday            NA            
#DemDebate               18928

ツイート数が多いトレンド

# ツイート数の降順で並べ替え
trend_df_sort <- arrange(trend_df, desc(tweet_vol))

ツイート数が多いトレンド

# 最もツイートされたトレンドを表示
head(trend_df_sort)

trend              tweet_vol
<chr>               <dbl>
LeBron              298302            
Lions               267945            
Columbus Day        135014            
John Bolton         118933            
#DETvsGB            67197            
#TuesdayThoughts    63259

旅行会社は「Columbus Day」に合わせて販促可能

Ayo berlatih!

Rで学ぶソーシャルメディアデータ分析