将文件输入进度条颜色更改为R Shiny中的渐变

Question

无法在我的fileinput进度栏中添加渐变色。

现在，我可以使用此处提供的代码将进度条的颜色从常规的蓝色更改为其他颜色。 fileInput中进度条的颜色-闪亮

ui <- fluidPage(

    tags$head(tags$style(".progress-bar{background-color:#3c763d;}")),

    fileInput(inputId = "fileInp", label = "Input file:",multiple = FALSE,
               accept = c(
                 "text/csv",
                 "text/comma-separated-values,text/plain",
                 ".csv"))

  )


  server <- function(input, output){


  }

  shinyApp(ui=ui, server=server)


##also tried replacing background color with code from https://www.w3schools.com/css/css3_gradients.asp but no luck :


  background-color: linear-gradient(to right, red , yellow);

但是，我想要的是像这样https://imgur.com/XdFBUIt有渐变

Answer 1

尝试从预定义的调色板创建色带： https : //www.rdocumentation.org/packages/dichromat/versions/1.1/topics/colorRampPalette

Answer 2

要在CSS中设置渐变，该属性为background-image ，不是background-color 。 您还必须将background-size设置为auto ，否则将其设置为40px 40px ，并且进度条将被条纹化。 这是CSS：

  tags$head(
    tags$style(
      ".progress-bar {
          background-image: linear-gradient(to right, red , yellow) !important;
          background-size: auto !important;
      }")
  )