Измените цвет и значок шестеренки на панели управления ShinyDashboard

1. Для изменения цвета используйте skin =, где вы можете установить различные цвета: смотрите здесь https://rstudio.github.io/shinydashboard/appearance.html

2. Чтобы изменить значок прежней известной «правой боковой панели», теперь известной как «панель управления», используйте controlbarIcon в dashboardHeader: Здесь мы заменили значок шестеренки на значок информации:

library(shiny)
library(shinydashboardPlus)

shinyApp(
  ui = dashboardPage(skin = "purple",
    options = list(sidebarExpandOnHover = TRUE),
    header = dashboardHeader(
      controlbarIcon = shiny::icon("info")
    ),
    sidebar = dashboardSidebar(),
    body = dashboardBody(
      #tags$style(".fa-thumbtack {color:rgb(255,0,0)}"), ##  this changes only the horizontal pin color
      tags$head(tags$style(type = "text/css", ".fa-thumbtack {color:rgb(255,0,0)  !important;}"))
    ),
    controlbar = dashboardControlbar(
      id = "controlbar",
      collapsed = FALSE,
      overlay = TRUE, 
      skin = "light",
      pinned = T
    )
  ),
  server = function(input, output, session) {
  }
)