반짝 이는 응용 프로그램의 www 폴더에서 지원되는 문서를 다운로드

Question

내 응용 프로그램을 구동하는 데이터 세트가 거대하기 때문에 반짝이는 응용 프로그램에서 용어집 페이지를 만들고 있습니다. 그러나, 나는 모든 세부 사항을 다 커버 할 수 없었다. 그들 중 일부는 다운로드 가능한 단어 또는 pdf 파일로 제공하는 것을 좋아합니다. 내 파일의 이름을 가정하면 다음과 같이 응용 프로그램의 UI 내에서 내 코드는, 내가 내 응용 프로그램의 www 폴더에 저장 한

estimates.doc 

입니다 :

library(shiny) 
ui <- navbarPage("TITLE HERE", 
    tabPanel("GLOSSARY", 
     p("Click", a(href = "~/www/Estimation_Procedure.doc", "here"), "to download.") 
    ) 
) 

server <- function(session, input, output) {} 

shinyApp(ui, server) 

나는 방법을 모르겠습니다 여기에 downloadHandler를 포함 시켜라 ... 나는 메시지를 얻지 못하고있다.

Answer 1

downloadHandler 및 downloadLink를 사용할 수 있습니다.

library(shiny) 
ui <- navbarPage("TITLE HERE", 
       tabPanel("GLOSSARY", 
          downloadLink(outputId = 'myFile' , label = 'to download') 
       ) 
) 

server <- function(session, input, output) { 
    output$myFile <- downloadHandler( 
    # generate file name 
    filename = function() {  
     'Estimation_Procedure.doc' 
    } , 
    # set file content 
    content = function(file) { 
     file.copy('www/Estimation_Procedure.doc' , file) 
    } 
) 
} 
shinyApp(ui, server)