如何解决如何在 Shiny 应用程序中包含指向网站的 URL 链接?
理想情况下,我试图在我闪亮的应用程序代码中嵌入一个网站,这样当用户点击“项目 1”下的“细胞培养”时,谷歌主页就会显示出来。我尝试这样做,但我的代码不起作用。理想情况下,当用户单击“Item 1”下的“Cell Culture”时,Google 的主页应该会自动显示在仪表板中,但是,如果这不可能并且用户必须单击超链接才能访问 google 的主页,那也没关系。
这是我目前的代码:
library(shiny)
library(shinydashboard)
ui <- dashboardPage(
dashboardHeader(title = "Dashboard"),dashboardSidebar(
sidebarMenu(
menuItem("Item 1",tabName = "Item 1",icon = icon("medicine"),menuSubItem("Cell Culture",list(ui = fluidPage(
uIoUtput("tab")))),menuSubItem("Isolation"),menuSubItem("Drug Substance"),menuSubItem("Drug Product")),menuItem("Item 2",tabName = "Item 2",menuSubItem("Cell Culture"),menuSubItem("Drug Product"))
)
),dashboardBody())
server = function(input,output,session){
url <- a("Google Homepage",href="https://www.google.com/")
output$tab <- renderUI({
tagList("URL link:",url)
})
}
shinyApp(ui,server)
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。