bs4dash_color {fresh} | R Documentation |
bs4Dash main colors
Description
bs4Dash main colors
Usage
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
)
Arguments
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. |
Value
a list
that can be used in create_theme
.
Examples
# 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)
}
[Package fresh version 0.2.1 Index]