如何在Shiny中搜索和上传.PNG文件?

问题描述

我正在尝试编写一个简单的Shiny应用程序,允许用户输入文本,并上传具有相同名称applicationId文件

.png

这是它的样子。我在说明中添加了我想要的内容

enter image description here

我希望它执行以下操作:

  1. 用户输入名称,例如“ Gene1”。
  2. App从library(shiny) library(shinydashboard) library(data.table) #Set header header <- dashboardHeader(title = "Gene Searcher") #function to create Boxes my.Box <- function(title,obj) { Box( title = title,status = "primary",solidHeader = TRUE,collapsible = TRUE,plotOutput(obj,height = "300px") ) } #set sidebar. sidebar <- dashboardSidebar( sidebarSearchForm(textId = "searchText",buttonId = "searchButton",label = "Search dataset",icon = shiny::icon("search")) ) #set body body <- dashboardBody(tableOutput("filtered_table"),my.Box("Table1","Table1"),my.Box("Table2","Table2")) ui <- dashboardPage(title = 'Search',header,sidebar,body) server <- function(input,output,session) { #empty for Now. } shinyApp(ui = ui,server = server) 目录中搜索名为“ Gene1.png”的文件,并将其上传到该框中。

我该怎么做?任何帮助表示赞赏!

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)