是否可以嵌入导航栏页面

navbarPage("Navbar!",tabPanel("Plot"

                 ),tabPanel("Summary"
                 ))

在shinydashboardplus标题面板中？

library(shiny)
library(shinydashboard)
shinyApp(
  ui = dashboardPagePlus(
    header = dashboardheaderPlus(
      enable_rightsidebar = TRUE,rightSidebarIcon = "gears"
    ),sidebar = dashboardSidebar(),body = dashboardBody(),title = "Right Sidebar"
  ),server = function(input,output) { }
)