Visualize popular terms

Analisando dados de mídias sociais em R

Vivek Vijayaraghavan

Data Science Coach

Visão geral da lição

Extraia os termos mais frequentes do corpus de texto
Remova stop words personalizadas e refine o corpus
Visualize termos populares com gráfico de barras e nuvem de palavras

Frequência de termos

Extraia a frequência de termos, que é o número de ocorrências de cada palavra

# Extract term frequency
library(qdap)
term_count  <-  freq_terms(twt_corpus_final, 60)
term_count

Frequência de termos

Removendo stop words personalizadas

# Create a vector of custom stop words
custom_stop <- c("obesity", "can", "amp", "one", "like", "will", "just", 
                "many", "new", "know", "also", "need", "may", "now", 
                "get", "s", "t", "m", "re")

# Remove custom stop words
twt_corpus_refined <- tm_map(twt_corpus_final,removeWords, custom_stop)

Contagem de termos após refinar o corpus

# Term count after refining corpus
term_count_clean <- freq_terms(twt_corpus_refined, 20)
term_count_clean

Frequência de termos após refinar o corpus

Uma marca que promove um programa de gestão da obesidade pode analisar esses termos

Gráfico de barras de termos populares

Crie um gráfico de barras com termos que ocorrem mais de 50 vezes
Gráficos de barras resumem termos populares de forma fácil de interpretar

# Create a subset dataframe
term50 <- subset(term_count_clean, FREQ > 50)

Gráfico de barras dos termos mais populares

library(ggplot2)

# Create a bar plot of frequent terms
ggplot(term50, aes(x = reorder(WORD,  -FREQ),  y = FREQ)) +
       geom_bar(stat = "identity", fill = "blue") + 
       theme(axis.text.x = element_text(angle = 45, hjust = 1))

Gráfico de barras de termos populares

Nuvem de palavras

Visualize os termos frequentes com nuvens de palavras
Nuvem de palavras é uma imagem composta por palavras
O tamanho de cada palavra indica sua frequência
Imagem promocional eficaz para campanhas
Comunica a mensagem da marca e destaca termos populares

Nuvem de palavras por frequência mínima

A função wordcloud() ajuda a criar nuvens de palavras

# Create a word cloud based on min frequency
library(wordcloud)
wordcloud(twt_corpus_refined, min.freq = 20, colors = "red", 
          scale = c(3,0.5), random.order = FALSE)

Nuvem de palavras por frequência mínima

Nuvem de palavras colorida

# Create a colorful word cloud
library(RColorBrewer)
wordcloud(twt_corpus_refined, max.words = 100, 
          colors = brewer.pal(6,"Dark2"), scale = c(2.5,.5),
          random.order = FALSE)

Nuvem de palavras colorida

Nuvem de palavras com cores diferentes

Vamos praticar!

Analisando dados de mídias sociais em R