Tidytuesday Christmas Songs Wordcloud

Created in December 24, 2019

2019   ·   tidytuesday   rstats

TidyTuesday: WordCloud for Christmas Music Billboards

library(tidyverse)
library(tidytext)
data(stop_words)
library(wordcloud2)

tuesdata <- tidytuesdayR::tt_load("2019-12-24")
lyrics <- tuesdata$christmas_lyrics

lyc <- lyrics %>% unnest_tokens(word, lyric) %>%
    anti_join(stop_words) %>%
    count(word, sort = TRUE)

## Joining, by = "word"

wordcloud2(lyc)


Enjoy Reading This Article?

Here are some more articles you might like to read next:

  • cmdAgent
  • cmd2cwl
  • Question-Answering Engine with CrewAI and SearXNG
  • RAG with langchain and free google gemini
  • Retrieval augmented generation