Twitterdatas komponenter

Analysera data från sociala medier i R

Sowmya Vivek

Data Science Coach

Lektionsöversikt

Introduktion till Twitter JSON
Extrahera metadatakomponenter från JSON
Använd komponenter för att dra insikter

Twitter JSON

En tweet kan ha över 150 metadatakomponenter
Tweets och deras komponenter returneras som JavaScript Object Notation

JSON-attribut och värden

Attribut och värden som beskriver tweets och komponenter
Exempel: screen_name lagrar en användares Twitter-handle

Twitter JSON-attribut och värden

Konvertera JSON till en dataram

Twitter JSON konverteras till en dataram av biblioteket rtweet
Attribut och värden omvandlas till kolumnnamn och värden

JSON-attribut konverterade till dataramkolumner

Visa tweetkomponenter

# Extract tweets on "#brexit" using search_tweets()
tweets_df <- search_tweets("#brexit")

# View the column names
names(tweets_df)

Visa tweetkomponenter

Komponenter i en tweet

Utforska komponenter

screen_name för att förstå användares intressen
followers_count för att jämföra inflytande i sociala medier
retweet_count och text för att identifiera populära tweets

Användarintresse och tweetantal

screen_name avser Twitter-handlen
Antal postade tweets indikerar intresse för ett ämne
Marknadsför produkter till intresserade användare

Användarintresse och tweetantal

# Extract tweets on "#Arsenal" using search_tweets()
twts_arsnl <- search_tweets("#Arsenal", n = 18000)

# Create a table of users and tweet counts for the topic
sc_name <- table(twts_arsnl$screen_name)
head(sc_name)

_____today_____   ___JJ23    ___SAbI__   __ambell   __Amzo__     __bobbysingh 
       1               2          3           1         1               1

Användarintresse och tweetantal

# Sort the table in descending order of tweet counts
sc_name_sort <- sort(sc_name, decreasing = TRUE)

# View top 6 users and tweet frequencies
head(sc_name_sort)

 _whatthesport  footy90com  Official_ATG1   TheShortFuse   RubellM   ArsenalZone_Ind 
      176           90            88             53           48            43

Följarantal

Antal följare som prenumererar på ett Twitter-konto
Indikerar kontots popularitet
Ett mått på inflytande i sociala medier
Placera annonser på populära konton för ökad synlighet

Jämför följarantal

# Extract user data using lookup_users()
tvseries <- lookup_users("GameOfThrones", "fleabag", "BreakingBad")

# Create a dataframe with the columns screen_name and followers_count
user_df <- tvseries[,c("screen_name","followers_count")]

Jämför följarantal

# View the followers count for comparison
user_df

screen_name        followers_count
<chr>                   <int>
GameOfThrones          8597188            
fleabag                  58727            
BreakingBad            1240349

Retweetantal och populära tweets

En retweet är en tweet som delas vidare av en annan användare
retweet_count lagrar antal retweets
Antal retweets hjälper till att identifiera trender
Populära retweets kan användas för att marknadsföra ett varumärke

Retweetantal och populära tweets

# Create a data frame of tweet text and retweet counts
rtwt <- tweets_arsenal[,c("text", "retweet_count")]

# Sort data frame based on descending order of retweet counts
library(dplyr)
rtwt_sort <- arrange(rtwt, desc(retweet_count))

Retweetantal och populära tweets

# Exclude rows with duplicate tweet text
rtwt_unique <- unique(rtwt_sort, by = "text")

Retweetantal och populära tweets

# Print top 6 unique posts retweeted most number of times
head(rtwt_unique)

retweet_count                text
<int>                        <chr>
5606            Once a Gunner, Always a Gunner. We are proud of you @alexanderiwob
3764            Emirates on Fire 🔥🔥🔥🔥 Never give up Gunners💪🏽💪🏽💪🏽 #Arsenal #CO
2798            That mood tonight ⚡️⚡️⚡️ 3️⃣ POINTS 🔴⚪️ #Arsenal #Gunners #COYG h
2741            #Arsenal fan: "I reckon we'll win the League this season." @Robbie
1687            Auba 😭😭😍😍 This is what I call happiness #aubameyang #arsenal
1166            When sky sports introduced the new Monday night football! The Sha

Nu kör vi en övning!

Analysera data från sociala medier i R