# NOT RUN {
url <- file.path("https://www.oclc.org/content/dam/research/presentations",
"2019/111319-godby-NISO-What-Are-Entities-Matter.pptx")
file <- download(url)
(txt <- read_pptx(file))
pptx_doc <- system.file('docs/Hello_World.pptx', package = "textreadr")
read_pptx(pptx_doc)
read_pptx(pptx_doc, include.notes = TRUE)
# }
Run the code above in your browser using DataLab