bs4Dash main colors
bs4Dash main colors
bs4dash_color( blue = NULL, lightblue = NULL, navy = NULL, cyan = NULL, teal = NULL, olive = NULL, green = NULL, lime = NULL, orange = NULL, yellow = NULL, fuchsia = NULL, purple = NULL, maroon = NULL, red = NULL, black = NULL, gray_x_light = NULL, gray_600 = NULL, gray_800 = NULL, gray_900 = NULL, white = NULL )
blue |
Default: #007bff. This color is used for primary status. |
lightblue |
Default: #3c8dbc. |
navy |
Default: #001f3f. |
cyan |
Default: #17a2b8. This color is used for info status. |
teal |
Default: #39cccc. |
olive |
Default: #3d9970. |
green |
Default: #28a745. This color is used for success status. |
lime |
Default: #01ff70. |
orange |
Default: #ff851b. |
yellow |
Default: #ffc107. This color is used for warning status. |
fuchsia |
Default: #f012be. |
purple |
Default: #605ca8. |
maroon |
Default: #d81b60. |
red |
Default: #dc3545. This color is used for danger status. |
black |
Default: #111. |
gray_x_light |
Default: #d2d6de. |
gray_600 |
Default: #6c757d. This color is used for secondary status. |
gray_800 |
Default: #343a40. Color for dark skin. |
gray_900 |
Default: #212529. Color for text in body. |
white |
Default: #ffffff. |
a list that can be used in create_theme.
# Change colors used in bs4Dash
bs4dash_color(
blue = "#F7FE2E",
lightblue = "#01DF3A"
)
if (interactive()) {
library(shiny)
library(bs4Dash)
ui <- bs4DashPage(
title = "bs4Dash Custom Colors",
# sidebar_collapsed = FALSE,
navbar = bs4DashNavbar(),
sidebar = bs4DashSidebar(
title = "bs4Dash Custom Colors",
skin = "light",
bs4SidebarMenu(
bs4SidebarMenuItem(
tabName = "tab1",
text = "UI components"
)
)
),
body = bs4DashBody(
use_theme(create_theme(
bs4dash_color(
blue = "#F7FE2E",
navy = "#01DF3A"
)
)),
bs4TabItems(
bs4TabItem(
tabName = "tab1",
tags$h2("UI components", class = "bg-navy"),
tags$h4("bs4ValueBox"),
fluidRow(
bs4ValueBox(
value = 150,
subtitle = "ValueBox with primary status",
status = "primary",
icon = "shopping-cart",
href = "#",
width = 4
)
),
tags$h4("bs4Card"),
fluidRow(
bs4Card(
title = "Card with primary status",
closable = FALSE,
width = 6,
solidHeader = TRUE,
status = "primary",
collapsible = TRUE,
p("Box Content")
)
)
)
)
)
)
server <- function(input, output) {
}
shinyApp(ui, server)
}Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.