## Not run:
# path <- system.file("examples", "example1.pdf", package = "fulltext")
#
# (res_xpdf <- ft_extract(path)) # xpdf is the default
# (res_xpdf <- ft_extract(path, "xpdf"))
# (res_gs <- ft_extract(path, "gs"))
#
# # pass on options to xpdf
# ## preserve layout from pdf
# ft_extract(path, "xpdf", "-layout")
# ## preserve table structure as much as possible
# ft_extract(path, "xpdf", "-table")
# ## last page to convert is page 2
# ft_extract(path, "xpdf", "-l 2")
# ## first page to convert is page 3
# ft_extract(path, "xpdf", "-f 3")
#
# # use on output of ft_get() to extract pdf to text
# ## arxiv
# res <- ft_get('cond-mat/9309029', from = "arxiv")
# res2 <- ft_extract(res)
# res$arxiv$data
# res2$arxiv$data
# res2$arxiv$data$data[[1]]$data
#
# ## biorxiv
# res <- ft_get('10.1101/012476')
# res2 <- ft_extract(res)
# res$biorxiv$data
# res2$biorxiv$data
# res2$biorxiv$data$data[[1]]$data
# ## End(Not run)
Run the code above in your browser using DataLab