Nothing
# Logo: Flat Red ----------------------------------------------------------------------------------------
#' @title logo_flat_red
#' @description Flat Red logo for a shinydashboard application
#'
#' @param boldText String. Bold text for the logo.
#' @param mainText String. Main text for the logo.
#' @param badgeText String. Text for the logo badge.
#'
#' @return Object produced by shinyDashboardLogoDIY
#' @seealso \code{\link{shinyDashboardLogoDIY}}
#' @export
logo_flat_red <- function(boldText = "Shiny", mainText = "App", badgeText = "v1.1") {
logo <- dashboardthemes::shinyDashboardLogoDIY(
boldText = boldText,
mainText = mainText,
textSize = 16,
badgeText = badgeText,
badgeTextColor = "white",
badgeTextSize = 2,
badgeBackColor = "rgb(207,57,92)",
badgeBorderRadius = 3
)
return(logo)
}
# Begin Exclude Linting
# Theme: Flat Red ---------------------------------------------------------------------------------------
#' @title theme_flat_red
#' @description Flat Red theme for a shinydashboard application
#'
#' @return Object produced by shinyDashboardThemeDIY
#' @seealso \code{\link{shinyDashboardThemeDIY}}
#' @export
theme_flat_red <- shinyDashboardThemeDIY(
### general
appFontFamily = "Arial"
,appFontColor = "rgb(42,102,98)"
,primaryFontColor = "rgb(0,0,0)"
,infoFontColor = "rgb(0,0,0)"
,successFontColor = "rgb(0,0,0)"
,warningFontColor = "rgb(0,0,0)"
,dangerFontColor = "rgb(0,0,0)"
,bodyBackColor = "rgb(255,255,254)"
### header
,logoBackColor = "rgb(45,59,66)"
,headerButtonBackColor = "rgb(45,59,66)"
,headerButtonIconColor = "rgb(255,255,255)"
,headerButtonBackColorHover = "rgb(45,59,66)"
,headerButtonIconColorHover = "rgb(207,57,92)"
,headerBackColor = "rgb(45,59,66)"
,headerBoxShadowColor = ""
,headerBoxShadowSize = "0px 0px 0px"
### sidebar
,sidebarBackColor = "rgb(207,57,92)"
,sidebarPadding = 0
,sidebarMenuBackColor = "transparent"
,sidebarMenuPadding = 0
,sidebarMenuBorderRadius = 0
,sidebarShadowRadius = ""
,sidebarShadowColor = "0px 0px 0px"
,sidebarUserTextColor = "rgb(255,255,255)"
,sidebarSearchBackColor = "rgb(255,255,255)"
,sidebarSearchIconColor = "rgb(207,57,92)"
,sidebarSearchBorderColor = "rgb(255,255,255)"
,sidebarTabTextColor = "rgb(255,255,255)"
,sidebarTabTextSize = 14
,sidebarTabBorderStyle = "none"
,sidebarTabBorderColor = "none"
,sidebarTabBorderWidth = 0
,sidebarTabBackColorSelected = "rgb(45,59,66)"
,sidebarTabTextColorSelected = "rgb(255,255,255)"
,sidebarTabRadiusSelected = "0px"
,sidebarTabBackColorHover = "rgb(186,51,83)"
,sidebarTabTextColorHover = "rgb(255,255,255)"
,sidebarTabBorderStyleHover = "none"
,sidebarTabBorderColorHover = "none"
,sidebarTabBorderWidthHover = 0
,sidebarTabRadiusHover = "0px"
### boxes
,boxBackColor = "rgb(248,248,248)"
,boxBorderRadius = 0
,boxShadowSize = "0px 0px 0px"
,boxShadowColor = ""
,boxTitleSize = 18
,boxDefaultColor = "rgb(248,248,248)"
,boxPrimaryColor = "rgb(15,124,191)"
,boxInfoColor = "rgb(225,225,225)"
,boxSuccessColor = "rgb(59,133,95)"
,boxWarningColor = "rgb(178,83,149)"
,boxDangerColor = "rgb(207,57,92)"
,tabBoxTabColor = "rgb(248,248,248)"
,tabBoxTabTextSize = 14
,tabBoxTabTextColor = "rgb(42,102,98)"
,tabBoxTabTextColorSelected = "rgb(207,57,92)"
,tabBoxBackColor = "rgb(248,248,248)"
,tabBoxHighlightColor = "rgb(207,57,92)"
,tabBoxBorderRadius = 0
### inputs
,buttonBackColor = "rgb(207,57,92)"
,buttonTextColor = "rgb(255,255,255)"
,buttonBorderColor = "rgb(207,57,92)"
,buttonBorderRadius = 0
,buttonBackColorHover = "rgb(186,51,83)"
,buttonTextColorHover = "rgb(255,255,255)"
,buttonBorderColorHover = "rgb(186,51,83)"
,textboxBackColor = "rgb(255,255,255)"
,textboxBorderColor = "rgb(118,118,118)"
,textboxBorderRadius = 0
,textboxBackColorSelect = "rgb(255,255,255)"
,textboxBorderColorSelect = "rgb(118,118,118)"
### tables
,tableBackColor = "rgb(248,248,248)"
,tableBorderColor = "rgb(235,235,235)"
,tableBorderTopSize = 1
,tableBorderRowSize = 1
)
# End Exclude Linting
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.