光沢のあるアプリのボックスステータスの色をカスタマイズしたいと思います。これらのボックスのボックスの背景色を変更するcssの方法を見つけましたが、ステータスの色をカスタマイズしませんが、cssに「status」の同等の引数が表示されませんか?したがって、考慮された引数「status」を含む単純なページのソースコードを印刷し、そのクラスを調べました(class = "box box-solid box-primary"だと思います)が、いくつかの方法で到達できませんこのウェブページで提供されている.css ... :(
アイデアはありますか?
これがこの単純なコードです:
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)
助けてくれてありがとう!
チャ
私はついに答えを見つけました(長くてタフですが、常に満足しています:D)
私の友人の1人(私の友人に感謝します!!!)は、Webページ(特に光沢のあるページ)の各要素のすべてのcssパラメーターを表示する方法を教えてくれます。適切なページに移動して右クリックします。要素を調べてください」!!
本当に素晴らしい !!
次に、私はより深く見て(非常に非常に深く、非常に多くのクラスがあります!!)、ボックスの任意のcssパラメーターにアクセスすることができました!
これが次の人々のためのコードです:
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)
良い週末を !!
乾杯!