如何在我的 Shiny APP 中显示 PDF？

如何解决如何在我的 Shiny APP 中显示 PDF？

稍微解释一下。我正在尝试创建一个显示 pdf 文件的仪表板，由用户输入名称进入 TextInput。

程序必须浏览到文件夹 www 并在仪表板主体中显示 pdf 问题是，程序可以运行并找到 pdf ，但它已打开 pdf 程序没有在我的 Shiny 应用程序中。

这是我的代码。

第二个问题，我如何省略用户不在文本输入中输入“.pdf”，我希望用户只输入没有 .pdf 的 pdf 文件名

谢谢！！

library(shiny)
library(shinydashboard)

ui <- dashboardPage(
  dashboardHeader(title="PDF display" ),dashboardSidebar(id= NULL,LIST= NULL),dashboardBody(
  
  textInput(inputId = "select_pdf",label = "Buscador de WB",placeholder = "Escibe el WB en MAYUSculaS"),uIoUtput("pdf_viewer")
  )
)

server <- function(input,output) {
 output$pdf_viewer<- renderUI({
     tags$iframe(style="height:600px; width:100%",src=input$select_pdf)
     
     
   })
}

shinyApp(ui,server)