Those variables can be used to customize panel (e.g. shinyWidgets::panel in Bootstrap and Bootswatch themes.

bs_vars_panel(
  bg = NULL,
  body_padding = NULL,
  heading_padding = NULL,
  footer_padding = NULL,
  border_radius = NULL,
  inner_border = NULL,
  footer_bg = NULL,
  default_text = NULL,
  default_border = NULL,
  default_heading_bg = NULL,
  primary_text = NULL,
  primary_border = NULL,
  primary_heading_bg = NULL,
  success_text = NULL,
  success_border = NULL,
  success_heading_bg = NULL,
  info_text = NULL,
  info_border = NULL,
  info_heading_bg = NULL,
  warning_text = NULL,
  warning_border = NULL,
  warning_heading_bg = NULL,
  danger_text = NULL,
  danger_border = NULL,
  danger_heading_bg = NULL
)

Arguments

bg

Background color.

body_padding

Panel body padding.

heading_padding

Panel heading padding.

footer_padding

Panel footer padding.

border_radius

Variable for setting rounded corners on panel.

inner_border

Border color for inner elements in panel.

footer_bg

Panel footer background color.

default_text

Default color for text.

default_border

Default border color.

default_heading_bg

Default background color for panel heading.

primary_text

Text color for primary status.

primary_border

Border color for primary status.

primary_heading_bg

Heading background color for primary status.

success_text

Text color for success status.

success_border

Border color for success status.

success_heading_bg

Heading background color for success status.

info_text

Text color for info status.

info_border

Border color for info status.

info_heading_bg

Heading background color for info status.

warning_text

Text color for warning status.

warning_border

Border color for warning status.

warning_heading_bg

Heading background color for warning status.

danger_text

Text color for danger status.

danger_border

Border color for danger status.

danger_heading_bg

Heading background color for danger status.

Value

a list that can be used in create_theme.

Examples

bs_vars_panel( border_radius = "15px", default_text = "#FFF", default_heading_bg = "#3f2d54", default_border = "#3f2d54", primary_heading_bg = "#1B9E77", primary_border = "#1B9E77", success_heading_bg = "#D95F02", success_border = "#D95F02", success_text = "#FFF", danger_heading_bg = "#7570B3", danger_border = "#7570B3", danger_text = "#FFF" )
#> $`panel-border-radius` #> [1] "15px" #> #> $`panel-default-text` #> [1] "#FFF" #> #> $`panel-default-border` #> [1] "#3f2d54" #> #> $`panel-default-heading-bg` #> [1] "#3f2d54" #> #> $`panel-primary-border` #> [1] "#1B9E77" #> #> $`panel-primary-heading-bg` #> [1] "#1B9E77" #> #> $`panel-success-text` #> [1] "#FFF" #> #> $`panel-success-border` #> [1] "#D95F02" #> #> $`panel-success-heading-bg` #> [1] "#D95F02" #> #> $`panel-danger-text` #> [1] "#FFF" #> #> $`panel-danger-border` #> [1] "#7570B3" #> #> $`panel-danger-heading-bg` #> [1] "#7570B3" #> #> attr(,"class") #> [1] "fresh_sass_vars" "bootstrap_vars" "list"
if (interactive()) { library(shiny) library(shinyWidgets) ui <- fluidPage( use_theme( create_theme( theme = "default", bs_vars_panel( border_radius = "15px", default_text = "#FFF", default_heading_bg = "#3f2d54", default_border = "#3f2d54", primary_heading_bg = "#1B9E77", primary_border = "#1B9E77", success_heading_bg = "#D95F02", success_border = "#D95F02", success_text = "#FFF", danger_heading_bg = "#7570B3", danger_border = "#7570B3", danger_text = "#FFF" ), output_file = NULL ) ), tags$h1("Custom panels"), fluidRow( column( width = 3, panel( heading = "Default panel", "Some content" ) ), column( width = 3, panel( heading = "Primary panel", status = "primary", "Some content" ) ), column( width = 3, panel( heading = "Success panel", status = "success", "Some content" ) ), column( width = 3, panel( heading = "Danger panel", status = "danger", "Some content" ) ) ) ) server <- function(input, output, session) { } shinyApp(ui, server) }