Рендеринг 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)

0 ответов

Другие вопросы по тегам