R - 闪亮：布局的颜色

Question

我希望整个布局都是彩色的 #84754C。但有些部分是蓝色的。我怎样才能让那部分也变成颜色 #84754C？有人可以帮忙吗？

代码：

library(shiny)
library(shinydashboard)

ui <- dashboardPage(
  dashboardHeader(),
  dashboardSidebar(),
  dashboardBody(
    tags$style(HTML("

                    .box.box-solid.box-primary>.box-header {
                    color:#fff;
                    background:#84754C
                    }
                    .skin-blue .main-header .logo {
                    background-color: #84754C;
                    }


                    ")),

    fluidRow(
      box(width = 6, title = "test", status = "primary", solidHeader = 
            TRUE,
          "Box content"
      )
    )
    )
  )


server <- function(input, output) {}

shinyApp(ui, server)

截图：

Answer 1

您需要确定要更改颜色的元素。 .skin-blue .main-header .logo 仅指改变颜色的部分，而不是整个顶部栏。将代码更改为：

tags$style(HTML("

                .box.box-solid.box-primary>.box-header {
                color:#fff;
                background:#84754C
                }
                .skin-blue .main-header .logo {
                background-color: #84754C;
                }
                .skin-blue .main-header .navbar {
                background-color: #84754C;
                }

                "))

R - 闪亮：布局的颜色

R - Shiny : Colors of Layout

r

shiny

shiny-server