R Shiny 制作子面板

Question

是否有一个简单的解决方案可以在 R 中创建的主选项卡面板中制作选项卡面板？

这是我创建主面板的方法:

mainPanel(
  tabsetPanel(id = "tabSelected",
    tabPanel("Tab1", uiOutput("Tab1")),
    tabPanel("Tab2", uiOutput("Tab2"))

我想在“Tab1”中为我想展示的各种情节制作新标签。我试图嵌套 tabsetPanel 函数，但这不起作用。谢谢!

Answer 1

也许是因为忘记将它们包含在新的子 tabsetPanel 中？

这对我有用:

shiny::runApp(list(
  ui = bootstrapPage(

    tabsetPanel(id = "tabSelected",
      tabPanel("Tab1", uiOutput("Tab1")),
      tabPanel("Tab2", uiOutput("Tab2"))
    )

  ),
  server = function(input, output,session) {

    output$Tab1 <- renderUI({
      tabsetPanel(id = "subTabPanel1", 
        tabPanel("subTab11"),
        tabPanel("subTab12")
      )
    })

    output$Tab2 <- renderUI({
      tabsetPanel(id = "subTabPanel2", 
                  tabPanel("subTab21"),
                  tabPanel("subTab22")
      )
    })
  }
))