css - 在 R Shiny 中更改 selectizeInput 选项的颜色

标签 css r shiny shinyapps

我想在我的 Shiny 应用程序中更改 selectizeInput 菜单的每个单独选项的颜色。在下面的示例代码中,我可以将所有菜单选项的颜色更改为蓝色,但如何为每个单独的选项更改颜色?例如使“a”红色,“b”蓝色,“c”绿色等

非常感谢!

shinyApp(
  ui = 
    shinyUI(fluidPage(
      tags$head(
        tags$style(HTML("
     .item {
       background: #2196f3 !important;
       color: white !important;
     }
     .selectize-dropdown-content .active {
       background: #2196f3 !important;
       color: white !important;
     }
  "))
      ),
      sidebarLayout(
        sidebarPanel(
          selectizeInput("select", label=NULL,
                         choices=c("a", "b", "c", "d"),
                         selected = c("a", "b", "c", "d"),
                         multiple=TRUE, options=list(placeholder="Wybierz"))),
        mainPanel())
    )
    ),
  server = function(input, output){}
)
> sessionInfo()
R version 3.6.3 (2020-02-29)
Platform: x86_64-apple-darwin15.6.0 (64-bit)
Running under: macOS High Sierra 10.13.6

Matrix products: default
BLAS:   /System/Library/Frameworks/Accelerate.framework/Versions/A/Frameworks/vecLib.framework/Versions/A/libBLAS.dylib
LAPACK: /Library/Frameworks/R.framework/Versions/3.6/Resources/lib/libRlapack.dylib

locale:
[1] en_GB.UTF-8/en_GB.UTF-8/en_GB.UTF-8/C/en_GB.UTF-8/en_GB.UTF-8

attached base packages:
[1] stats4    parallel  stats     graphics  grDevices utils     datasets  methods  
[9] base     

other attached packages:
 [1] rsconnect_0.8.16     shinythemes_1.1.2    dplyr_0.8.5          shiny_1.4.0.2       
 [5] BiocParallel_1.20.1  MLInterfaces_1.66.5  cluster_2.1.0        annotate_1.64.0     
 [9] XML_3.99-0.3         AnnotationDbi_1.48.0 IRanges_2.20.2       MSnbase_2.12.0      
[13] ProtGenerics_1.18.0  S4Vectors_0.24.4     mzR_2.20.0           Rcpp_1.0.4.6        
[17] Biobase_2.46.0       BiocGenerics_0.32.0 

最佳答案

你可以这样做:

.option[data-value=a] {
  background: red !important;
  color: white !important;
}
.option[data-value=b] {
  background: green !important;
  color: white !important;
}
.option[data-value=c] {
  background: blue !important;
  color: white !important;
}
.option[data-value=d] {
  background: magenta !important;
  color: white !important;
}

关于css - 在 R Shiny 中更改 selectizeInput 选项的颜色,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/61339878/

相关文章:

r - 如何在选项卡上获得 Shiny 的通知图标

r - 具有多个输入的 Shiny 渲染UI

ASP.NET 控件

R 编写风格 - 需要与::

r - Shiny 的 slider - 检索值 - 列表,或者..?

r - 更改日期格式时如何将向量保留为 R 中的日期类

r - XPath在R中的br标签之后提取文本

CSS 布局 : Div's within divs etc

javascript - 一个内联 block 元素没有降低

javascript - 突出显示表行