R Блестящий Слайдер Меняет цвет фона

#r #shiny

Вопрос:

У меня есть блестящая панель управления 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%') 
    })
 

Ответ №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