如何在Rshiny中让两个菜单独立或分层？

library(shiny)

ui <- navbarPage(
  "Rshiny App",
  tabPanel(
    "Menu 1",
    sidebarLayout(
      sidebarPanel(
        # 添加Menu 1的侧边栏内容
        # ...
      ),
      mainPanel(
        # 添加Menu 1的主要内容
        # ...
      )
    )
  ),
  tabPanel(
    "Menu 2",
    sidebarLayout(
      sidebarPanel(
        # 添加Menu 2的侧边栏内容
        # ...
      ),
      mainPanel(
        # 添加Menu 2的主要内容
        # ...
      )
    )
  )
)

server <- function(input, output) {
  # 服务器逻辑
  # ...
}

shinyApp(ui, server)