Цвет фона в поле на панели ShinyDashboard ⇐ CSS

[Anonymous]

Я хочу использовать собственный цвет для поля в Shinydashboard. Следующий CSS делает свое дело, но когда у меня есть складной = TRUE, он не выглядит последовательным:

Код: Выделить всё

library(shiny)
library(shinydashboard)
library(shinydashboardPlus)

shinyApp(
ui = dashboardPage(
dashboardHeader(),
dashboardSidebar(),
dashboardBody(
tags$style(HTML("

.box.box-solid.box-success>.box-header {
color:#2071B5;
background:#ABD7E9
}

.box.box-solid.box-success{
border-bottom-color:#ABD7E9;
border-left-color:#ABD7E9;
border-right-color:#ABD7E9;
border-top-color:#ABD7E9;
background:#ABD7E9

}

")),

box(
title = "Shiny Box",
status = "success",
solidHeader = TRUE,
collapsible = TRUE,
collapsed = TRUE,
tags$head(tags$style(HTML("div#inline label { width: 52%; }
div#inline input { display: inline-block; width: 68%;}"))),
tags$head(
tags$style(type="text/css", "#inline label{ display: table-cell; text-align: left; vertical-align: middle; }
#inline .form-group { display: table-row;}")),
div(id="inline",  style="width:35vw;",
div(HTML("TEST [/b]")),
br(),
numericInputIcon("A", h5("test1"), value = 20, icon = icon("percent")) ,
numericInputIcon("B", h5("test2"), value = 40, icon = icon("percent")) ,
numericInputIcon("C", h5("test3"), value = 60, icon = icon("percent")) ,
currencyInput("X", "Total", value = 0.3, format = "percentageUS2dec")

)
)
)
),
server = function(input, output) { }
)

Добавление следующего CSS также не помогло:

Код: Выделить всё

.box.box-solid.box-success>.box-header>.box-tools.pull-right {
color:#2071B5;
background:#ABD7E9
}

Я хотел бы, чтобы весь цвет фона был #ABD7E9, включая фоны для числового ввода!

Подробнее здесь: https://stackoverflow.com/questions/749 ... ydashboard