R Shiny SlickR更改背景颜色

Question

我有一个闪亮的R仪表板，并添加了slickR包，它可以工作。然而，我正在努力将每个图像侧面的空格设置为我想要的颜色。有什么建议吗？我甚至尝试过CSS，但这似乎不起作用。

          fluidRow(
            tags$div(
              slickROutput("slickr"),
              #style='background-color:red;' # didnt' work, got overwritten by slickR
            ) #close tags
          ) #close fluidRow

  output$slickr <- renderSlickR({
    imgs <- list.files("images/", pattern=".jpg", full.names = TRUE)
    slickR(obj = imgs ,slideId = 'ex1',height = 450, width='100%') 
    })

Answer 1

创建一个单独的.css文件，并在其中添加自定义样式，以防止它在样式属性中被覆盖。

ui.R

fluidPage(
  tags$head(
    tags$style(rel = "stylesheet", type = "text/css", href = "slickr.css")
  ),
  ...,
  fluidRow(
    column(12, slickROutput("slickr"))
  )
)

www/slickr.css

#slickr {
  background-color: red;
}

这里有更多关于CSS的信息：https://shiny.rstudio.com/articles/css.html