Download this file
1 2 3 4
library(readr) parenthesis <- read_lines("parenthesis.txt") use_data(parenthesis, overwrite = TRUE)