Я хотел бы отображать различные входы для разных вкладок. Поэтому я попытался создать страницу с несколькими tabPanels. Тем не менее, я не могу иметь что-то вроде ниже:

library(shiny)

shinyUI(pageWithSidebar(
  headerPanel("Header"),

  tabsetPanel(
    tabPanel(
      headerPanel("Tab 1"),
      sidebarPanel(
        selectInput("var", "Parametre", choices = c("1", "2", "3"))
        ),
      mainPanel(
        textOutput("text1")
        )
      ),
    tabPanel(
      headerPanel("Tab 2"),
      sidebarPanel(
        selectInput("var", "Parametre", choices = c("21", "22", "23"))
      ),
      mainPanel(
        textOutput("text2")
      )
    )
    )
  ))

Я подозреваю, чтоpageWithSidebar вызывает проблему, но я не смог найти альтернативу в группах Google. Есть ли способ отобразить несколько вкладок с их собственными боковыми панелями и главными панелями, или я буду создавать разные приложения для этой цели?