Рендеринг tabsetPanel под tabPanel в Shiny R
Я хочу иметь несколько вкладок под tabPanel-3. Я попытался вставить другую tabsetPanel под tabPanel, но это не сработало.
output$mytabs = renderUI({
tabs =
tabsetPanel(
tabPanel('Tab1', wellPanel(checkboxInput('All','Check All/Uncheck All',T),uiOutput('tab1'))),
tabPanel('Tab2', gridster(tile.width = 100, tile.height = 100,
gridsterItem(row = 1, col = 1, size.x = 1, size.y = 1,style='background-color:#FFFFFF',
tags$div(class = 'grid_title', 'Tab2 - Title'), htmlOutput("tab2")))),
tabPanel('Tab3',
gridster(tile.width = 250, tile.height = 1000,
gridsterItem(row = 1, col = 1, size.x = 1, size.y = 1,style='background-color:#FFFFFF',
tags$div(class = 'grid_title', 'Tab 3- Plot 1'), showOutput("Chart1","nvd3")),
gridsterItem(row = 2, col = 1, size.x = 1, size.y = 1,style='background-color:#FFFFFF',
tags$div(class = 'grid_title', 'Tab 3 - Plot 2'), chartOutput("Chart2"))
))
)
mainPanel(tabs)
})
outputOptions(output, "mytabs", suspendWhenHidden = T)