benmarwick

library(tidyverse)
library(stringr)

# read in the transcript
# I simply copied the text from the page at
# https://www.washingtonpost.com/news/the-fix/wp/2016/09/26/the-first-trump-clinton-presidential-debate-transcript-annotated/
# and popped it into a txt file
xx <- scan("first_debate_2016.txt", "character")