navbarPage
可以通过使用inverse
参数来将类更改为navbar-inverse,所以您不需要干扰css。library(shiny)
ui <- shinyUI(navbarPage(inverse=TRUE,
"title1", tabPanel("title2",
sidebarLayout(sidebarPanel(), mainPanel()))))
server <- function(input, output) {}
shinyApp(ui, server)