At a seminar today, I bumped into my friend Thea. I showed her yesterday’s post and she pointed out:
It’ll be interesting to see what’s being said about the emojis
I agree, and so today I focus on context.
Workflow
- Define a function to obtain the tweets with the emoji of interest
- Make sense of the tweets from 2 emojis: (1) the most frequently tweeted one; and (2) the one that seems to be out of place, i.e the tangerine
Obtaining tweets with the emoji of interest
get_tweet_with_emoji <- function(emoji){
popular_emoji_df <-
emoji_counts %>%
## get tweet id containing the emoij
filter(
native == emoji,
counts > 0
) %>%
{.$tweet_id} %>%
## get tweet df containing the emoji
{df_tidy[.,]}
## extract text
(popular_emoji_text <-
df %>%
filter(id %in% popular_emoji_df$id) %>%
{.$text}
)
}
Emoji: heavy white checkmark
With regards to the heavy checkmark emoiji, it seems like people are saying they have voted.
Emoji: tangerine
With the tangerine emoji, it seems like people or voting NDP…
Yay. I've seen a lot of orange fashion today. #BCVotes2017 #bcelxn17 🍊 https://t.co/AeKpF0HfnP
— sine nomine♿️ (@mssinenomine) May 9, 2017
or Green Party…
TODAY IS THE DAY. GO VOTE BC! #BCVotes2017 🍊🍑🥕
— linnea gwiazda (@lgwiazda) May 9, 2017