R闪亮制作子面板

Question

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

以下是我创建主面板的方法：

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

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

Answer 1

也许是因为yforget将它们包含在一个新的子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")
      )
    })
  }
))