Question

我想用css改变我闪亮的app滑块的颜色。当我应用这个答案的建议时，一切正常：

Changing the color of the sliderInput in Shiny walkthrough

但是，只要我将滑块更改为两个值为value = range（x，y）的值，两个滑块的颜色就不会再变化了。

这是一个最小的例子：

   library(shiny)
   ui<-shinyUI(fluidPage(
   theme = "bootstrap.css",
   navbarPage("", 
   tabPanel("Diagramm",
   headerPanel("Sliders"),
   sidebarPanel(
   sliderInput("decimal", "Decimal:", 
   min = 0, max = 1, value=range(0.1,0.9),step= 0.1)
   ),
   mainPanel(
   tableOutput("values")
   )
   ))
   ))

   server<-shinyServer(function(input, output) {
  })
shinyApp(ui = ui, server = server)

和bootstrap.css（位于www文件夹中）是

.js-irs-0 .irs-bar {
border-top-color: #d01010;
border-bottom-color: #d01010;
} 

.js-irs-0 .irs-bar-edge {
border-color: #d01010;
}

.js-irs-0 .irs-single, .js-irs-0 .irs-bar-edge, .js-irs-0 .irs-bar {
background: #a00;
}

输出给出 output，但我希望蓝色滑块也是紫色的。

有没有人知道在使用范围时如何更改两个滑块的颜色？

感谢。

Answer 1

您还希望添加以下内容：

.js-irs-0 .irs-to,.js-irs-0 .irs-from

用范围更改闪亮的sliderInput的颜色

1 个答案: