我正在开发一个应用程序,可帮助按主题/主题组织和可视化许多 PDF 文档。我可以上传和阅读单个 PDF,但我无法阅读多个 PDF 文档。
对于单个 PDF 文档:
用户界面
---
fileInput('file1', 'Choose PDF File', accept=c('.pdf'))
---
服务器
--------
library(pdftools)
-------
mypdf<-reactive({
inFile <- input$file1
if (is.null(inFile)){
return(NULL)
}else{
pdf_text(inFile$datapath)
}
})
要上传多个 PDF 文件,我必须在代码的 ui.R 部分使用 multiple = TRUE,但如何读取所有上传的文件?
最佳答案
上传的文件可以像这样在 for 循环中读取
for(i in 1:length(input$files[,1])){
lst[[i]] <- read.csv(input$files[[i, 'datapath']])
}
这是 CSV 文件的示例,但您可以对 pdf 文件执行相同操作。
关于r - 在 Shiny 中上传许多文件,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/36850114/