R shinyDashboard kutusu durum rengini özelleştir

Question

Parlak uygulamamın kutu durumu rengini özelleştirmek istiyorum. Bu kutunun kutu arka plan rengini değiştirmek için bir css yolu buluyorum ama durum rengini özelleştirmek için değil, ancak css'de "status" eşdeğer argümanını görmüyorum? Bu nedenle, "durum" argümanını içeren basit bir sayfanın kaynak kodunu yazdım ve onun sınıfına baktım (sanırım class = "kutu kutu-katı kutu-birincil") ama ona ulaşmayı başaramıyorum Bu web sayfasında yer alan çeşitli .css ... :(

bir fikrin var mı Burada

bu basit kod şudur:?!

library(shiny) 
library(shinydashboard) 

ui <- dashboardPage(
    dashboardHeader(), 
    dashboardSidebar(), 
    dashboardBody(
    fluidRow(
     box(width = 6, title = "youhou", status = "primary", solidHeader = TRUE, 
      "Box content" 
    ) 
    ) 
    ) 
    ) 


server <- function(input, output) {} 

shinyApp(ui, server) 

herhangi bir yardım için şimdiden teşekkür ederiz

Cha

Sonunda (uzun ve zorlu ama her zaman sevindirici: D) cevabını buldu

Answer 1

arkadaşım

One (arkadaşım çok teşekkür ederim !!!) bir her elementin bütün css parametrelerini nasıl görüntüleneceğini bana gösteriyor web sayfası (ve özellikle parlak bir sayfa: uygun sayfaya gidin ve sağ tıklama, "eleman incelemek" gibi bir şey!

AMAZING !! O zaman daha derin (çok çok daha derin, çok fazla sınıf var!) Ve kutuların herhangi bir css parametresine erişmeyi başardım!

İşte önümüzdeki insanlar için kodudur:

library(shiny) 
library(shinydashboard) 

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


.box.box-solid.box-primary>.box-header { 
    color:#fff; 
    background:#666666 
        } 

.box.box-solid.box-primary{ 
border-bottom-color:#666666; 
border-left-color:#666666; 
border-right-color:#666666; 
border-top-color:#666666; 
} 

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


server <- function(input, output) {} 

shinyApp(ui, server) 

iyi bir hafta sonu var !!

Şerefe!