Блог

Почему изменение цвета навигационной панели не работает с версиями BS 4 и 5 в shiny (версия 1.6.0.9022)?

Воспроизводимый пример:

приложение.R

 library(shiny)
library(bslib)

theme_test <- bs_theme(version = 5,
                       primary = "#d83e3e") %>%
bs_add_rules(sass::sass_file("custom.scss"))

ui <- navbarPage(title = "Test", theme = theme_test)

server <- function(input, output) {}

shinyApp(ui, server)
 

пользовательские.scss

 .navbar { 
    background-color: $primary;
    color: $primary;
}
 

бежать

 library(shiny)
runApp("FOLDERNAME")
 

Немного повозившись, я нашел правильный css/sass:

 .bg-light, .navbar-default {
    background-color: $primary !important;
}