我想在 R闪亮应用程序中为不在 www 文件夹中的 PDF 创建 pdf 查看器。
在下面的代码中,如果
my_path
不是指www文件夹,那么它似乎不起作用。
library(shiny)
ui <- fluidPage(
uiOutput("PDF_WINDOW")
)
server <- function(input, output, session) {
output$PDF_WINDOW <- renderUI({
tags$iframe(style="height:485px; width:100%", src= my_path)
})
}
shinyApp(ui, server)
感谢您的任何建议
您需要使包含 pdf 文件的文件夹可供网络服务器使用。这可以通过
addResourcePath
: 来完成
library(shiny)
my_path <- "/path/to/folder/containing/the/pdf/file"
addResourcePath(prefix = "my_pdf_resource", directoryPath = my_path)
ui <- fluidPage(
uiOutput("PDF_WINDOW")
)
server <- function(input, output, session) {
output$PDF_WINDOW <- renderUI({
tags$iframe(style="height:50vh; width:100%", src = "my_pdf_resource/my_pdf_filename.pdf")
})
}
shinyApp(ui, server)
如您所见,定义的前缀替换了
src
参数中的路径。