在Shiny中传递ui中的小部件值

无论何时需要动态参数 ui ,您需要使用 uiOutput 结合 renderUI 。 Read more

用户界面。R

在 用户界面 定义 UI输出 将在服务器端渲染的:

selectInput("dataset", "",
              choices = c("A", "B", "C"), # A to C are datasets in memory
              selected = "B"),
uiOutput("ui")

服务器R

在服务器端使用 伦德鲁 :

output$ui <- renderUI( {
      conditionalPanel("input.tabs === 'tab'",
                       checkboxGroupInput("checkboxes", "",
                                          input$dataset,
                                          selected = input$dataset))
})

您可以使用访问选定值 input$dataset 。如果您需要 choices ,可以先将其存储在向量中,然后将其提供给两者 selectInput s