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")
      )
    })
  }
))

R闪亮制作子面板

1 个答案: