# NOT RUN {
system.file("docs/Simpsons_Roasting_on_an_Open_Fire_Script.pdf", package = "textshape") %>%
textreadr::read_document() %>%
split_match_regex_to_transcript("^[A-Z]{3,}", skip = 2)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab