Загрузка многих файлов в Shiny

Question

Я разрабатываю приложение, которое помогает организовать и визуализировать многие документы PDF по темам/темам. Я могу загружать и читать один PDF-файл, но мне трудно читать несколько документов PDF.

Для одного PDF документа:

ui.R

--- 
    fileInput('file1', 'Choose PDF File', accept=c('.pdf')) 

--- 

server.R

-------- 

    library(pdftools) 

    ------- 


mypdf<-reactive({ 

    inFile <- input$file1 

    if (is.null(inFile)){ 
    return(NULL) 
    }else{ 
    pdf_text(inFile$datapath) 

    } 

    }) 

---

Для загрузки нескольких файлов, я должен использовать несколько = TRUE в часть кода ui.R, но как я могу читать во всех загруженных файлах?

Answer 1

загруженные файлы можно прочитать в цикле, как этот

for(i in 1:length(input$files[,1])){ 
    lst[[i]] <- read.csv(input$files[[i, 'datapath']]) 
} 

Это пример для CSV-файлов, но вы можете сделать то же самое для PDF-файлов.