2013-08-06 2 views
1

Я попытался example code recommended in the tm::readPDF documentation:тм readPDF: Ошибка в файле (CON, «г»): не может открыть соединение

library(tm) 

if(all(file.exists(Sys.which(c("pdfinfo", "pdftotext"))))) { 
    uri <- system.file(file.path("doc", "tm.pdf"), package = "tm") 
    pdf <- readPDF(PdftotextOptions = "-layout")(elem = list(uri = uri), 
               language = "en", 
               id = "id1") 
    pdf[1:13] 
} 

Но я получаю следующее сообщение об ошибке (которое происходит после вызова функции, возвращаемой readPDF):

Error in file(con, "r") : cannot open the connection 
In addition: Warning message: 
In file(con, "r") : 
    cannot open file 'C:\DOCUME~1\Tomas\LOCALS~1\Temp\RtmpU33iWo\pdfinfo31c2bd5762a': No such file or directory 

Обратите внимание, что я установил все Xpdf двоичные файлы в текущей директории (но это обрабатывается условием if).

EDIT: обнаружено это ошибка. Что было бы самым простым способом?

+0

Легкое обходное решение: http://stackoverflow.com/questions/17979074/error-trying-to-read-a-pdf-using-readpdf-from-the-tm-package/17981259#17981259 – Ben

ответ

3

ли некоторые отладки и посмотреть, она не в tm:::pdfinfo():

status <- system2("pdfinfo", shQuote(normalizePath(file)), 
     stdout = outfile) 

Эта команда не создает выходной_файл. Согласно Redirect system2 stdout to a file on windows это ошибка!

Смежные вопросы