r-更改導航欄顏色為閃亮

Question

我正在嘗試更改頁面頂部導航欄的顏色。 我搜索了許多資源，但只發現如何更改mainPanel上的顏色。 我是CSS的新手，所以我不知道如何將代碼插入應用程序。 誰能告訴我一些例子？

這是我的閃亮應用程序：navbarPage

我想把它變成這樣：黑色

因為我的代碼太長了，無法放在這里。 結構看起來像

shinyUI(navbarPage("title1", 
          tabPanel("title2",
            sidebarLayout(
              sidebarPanel(
              )
            )
           )
)

提前謝謝了。

Answer 1

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)