Wizualizacja popularnych terminów

Analiza danych z mediów społecznościowych w R

Vivek Vijayaraghavan

Data Science Coach

Przegląd lekcji

Wyodrębnij najczęstsze terminy z korpusu tekstowego
Usuń niestandardowe stop words i udoskonal korpus
Wizualizuj popularne terminy za pomocą wykresu słupkowego i chmury słów

Częstość terminów

Wyodrębnij częstość terminów, czyli liczbę wystąpień każdego słowa

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

Częstość terminów

Usuwanie niestandardowych stop words

# 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)

Liczba terminów po udoskonaleniu korpusu

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

Częstość terminów po udoskonaleniu korpusu

Marka promująca program leczenia otyłości może analizować te terminy

Wykres słupkowy popularnych terminów

Utwórz wykres słupkowy terminów występujących ponad 50 razy
Wykresy słupkowe w przejrzysty sposób podsumowują popularne terminy

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

Wykres słupkowy najpopularniejszych terminów

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))

Wykres słupkowy popularnych terminów

Chmura słów

Wizualizuj częste terminy za pomocą chmur słów
Chmura słów to obraz złożony ze słów
Rozmiar słowa odzwierciedla jego częstość
Skuteczny materiał promocyjny dla kampanii
Przekazuje przekaz marki i wyróżnia popularne terminy

Chmura słów na podstawie minimalnej częstości

Funkcja wordcloud() służy do tworzenia chmur słów

# 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)

Chmura słów na podstawie minimalnej częstości

Kolorowa chmura słów

# 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)

Kolorowa chmura słów

Chmura słów w różnych kolorach

Czas na ćwiczenia!

Analiza danych z mediów społecznościowych w R