通过软件包“tm”输入pdf在R中

Question

我知道通过软件包“tm”获得pdf在“R”工作空间中的实用示例，但无法理解代码是如何工作的，因此无法导入所需的pdf。以下代码导入的pdf是“tm”小插曲。

该代码是

if(file.exists(Sys.which("pdftotext"))) { 
    pdf <- readPDF(PdftotextOptions = "-layout")(elem = list(uri = vignette("tm")$pdf), 
               language = "en", 
               id = "id1") 
    pdf[1:13] 
} 

的 “TM” 是晕影。虽然我试图带来的pdf是“不同的”。那么如何改变上面的代码来把我的pdf放到工作区中。 minn是我正在尝试导入的pdf文档。

像

if(file.exists(Sys.which("pdftotext"))) { 
     pdf <- readPDF(PdftotextOptions = "-layout")(elem = list(uri = vignette("minn")$pdf), 
                language = "en", 
                id = "id1") 
     pdf[1:13] 
    } 

Answer 1

如此看来，问题是我将试图读取PDF。但代码如下所示。感谢托马斯的领导。 pdf的链接是“http://www.wine-economics.org/workingpapers/AAWE_WP16.pdf”

tt <- readPDF(PdftotextOptions="-layout") 
rr <- tt(elem=list(uri="AAWE_WP16.pdf"),language="en",id="id1") 
rr[1:15]