# NOT RUN {
path <- system.file("examples", "example1.pdf", package = "fulltext")
(res <- ft_extract_corpus(path, "xpdf"))
tm::TermDocumentMatrix(res$data)
(res_gs <- ft_extract_corpus(path, "gs"))
# }
Run the code above in your browser using DataLab