R file + speeches + scraper