Question

我正在尝试构建一个闪亮的仪表板，我想使用uiOutput。

在我的仪表板边栏中的ui.R文件中，我有一个调用uiOutput的menuitem：

library(shiny)
  dashboardSidebar(
    sidebarMenu(
      menuItem("TCA", tabName = "dashboard", icon = icon("dashboard")),
      menuItem(uiOUtput("Symbols")) ....

我的server.r文件如下：

 output$Symbols<-renderUI({
    selectInput('Test', 'Test:', choices = c(1,2,3), selected = 1)
  })

当我运行应用程序时：

## app.R ##
library(shinydashboard)
library(shiny)
shinyApp(ui, server)

我收到错误：

Error in tag("span", list(...)) : could not find function "uiOUtput"

你知道如何使用带有uiOutput的shinyDashboard吗？

Answer 1

一旦你纠正错字，下面的内容对我有用。您应该可以使用uiOuput。

library(shinydashboard)
runApp(
    list(ui = dashboardPage(
        dashboardHeader(),
        dashboardSidebar(
            sidebarMenu(
                menuItem(uiOutput("Symbols"))
            )
        ),
        dashboardBody()
    )

    , server = function(input, output) {   

        output$Symbols<-renderUI({
            selectInput('Test', 'Test:', choices = c(1,2,3), selected = 1)
        })
    }
    )
)

你能在闪亮的仪表板中使用uiOutput吗？

1 个答案: