library(plyr)
library(tidyverse)
library(scales)
library(nycflights13)

theme_set(theme_bw())

word_counts <- read.csv('inaugural_words.csv')

Word clouds?

Word clouds comparing inauguration speech for Bush (2001) and Obama (2009)

Bush (2001)