In favstats/demdebates2020: What the Package Does (One Line, Title Case)

Packages and Folders

# Install these packages if you don't have them yet
# if (!require("pacman")) install.packages("pacman")
# devtools::install_github("favstats/demdebates2020")

pacman::p_load(tidyverse, tidytext, demdebates2020, apexcharter)

source("mods/plots.R")

speakers <- debates %>% count(speaker, sort = T)
frontrunners <- speakers$speaker[1:5]

Word Counts

debates %>% 
  filter(speaker %in% frontrunners) %>% 
  count_words() %>%
  plot_word_counts()

Applause

debates %>% 
  filter(speaker %in% frontrunners) %>% 
  count_applauses() %>%
  plot_applause_counts

Laughter

debates %>% 
  filter(speaker %in% frontrunners) %>% 
  count_laughs() %>%
  plot_laugh_counts

Cross Talk

debates %>% 
  filter(speaker %in% frontrunners) %>% 
  count_talks() %>%
  plot_talk_counts

favstats/demdebates2020 documentation built on June 23, 2020, 12:16 a.m.