Nothing
# Logo: Purple Gradient ---------------------------------------------------------------------------------
#' @title logo_purple_gradient
#' @description Purple Gradient 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_purple_gradient <- function(boldText = "Shiny", mainText = "App", badgeText = "v1.1") {
logo <- dashboardthemes::shinyDashboardLogoDIY(
boldText = boldText,
mainText = mainText,
textSize = 16,
badgeText = badgeText,
badgeTextColor = "#31386b",
badgeTextSize = 2,
badgeBackColor = "rgb(255,255,255)",
badgeBorderRadius = 3
)
return(logo)
}
# Begin Exclude Linting
# Theme: Purple Gradient --------------------------------------------------------------------------------
#' @title theme_purple_gradient
#' @description Purple Gradient theme for a shinydashboard application
#'
#' @return Object produced by shinyDashboardThemeDIY
#' @seealso \code{\link{shinyDashboardThemeDIY}}
#' @export
theme_purple_gradient <- shinyDashboardThemeDIY(
### general
appFontFamily = "Arial"
,appFontColor = "rgb(128,177,221)"
,primaryFontColor = "rgb(255,255,255)"
,infoFontColor = "rgb(255,255,255)"
,successFontColor = "rgb(255,255,255)"
,warningFontColor = "rgb(255,255,255)"
,dangerFontColor = "rgb(255,255,255)"
,bodyBackColor = cssGradientThreeColors(
direction = "down"
,colorStart = "rgb(49,56,107)"
,colorMiddle = "rgb(71,59,109)"
,colorEnd = "rgb(78,88,149)"
,colorStartPos = 0
,colorMiddlePos = 70
,colorEndPos = 100
)
### header
,logoBackColor = "rgb(49,56,107)"
,headerButtonBackColor = "rgb(49,56,107)"
,headerButtonIconColor = "rgb(62,133,179)"
,headerButtonBackColorHover = "rgb(49,56,107)"
,headerButtonIconColorHover = "rgb(255,255,255)"
,headerBackColor = "rgb(49,56,107)"
,headerBoxShadowColor = ""
,headerBoxShadowSize = "0px 0px 0px"
### sidebar
,sidebarBackColor = cssGradientThreeColors(
direction = "down"
,colorStart = "rgb(49,56,107)"
,colorMiddle = "rgb(71,59,109)"
,colorEnd = "rgb(78,88,149)"
,colorStartPos = 0
,colorMiddlePos = 70
,colorEndPos = 100
)
,sidebarShadowRadius = ""
,sidebarPadding = 10
,sidebarShadowColor = "0px 0px 0px"
,sidebarMenuBackColor = cssGradientThreeColors(
direction = "right"
,colorStart = "rgb(48,103,157)"
,colorMiddle = "rgb(65,79,129)"
,colorEnd = "rgb(55,70,120)"
,colorStartPos = 0
,colorMiddlePos = 30
,colorEndPos = 100
)
,sidebarMenuPadding = 5
,sidebarMenuBorderRadius = 20
,sidebarUserTextColor = "rgb(128,177,221)"
,sidebarSearchBackColor = "rgb(40,70,115)"
,sidebarSearchIconColor = "rgb(50,115,145)"
,sidebarSearchBorderColor = "rgb(30,60,105)"
,sidebarTabTextColor = "rgb(128,177,221)"
,sidebarTabTextSize = 13
,sidebarTabBorderStyle = "none"
,sidebarTabBorderColor = "none"
,sidebarTabBorderWidth = 0
,sidebarTabBackColorSelected = cssGradientThreeColors(
direction = "right"
,colorStart = "rgb(56,137,189)"
,colorMiddle = "rgb(65,95,145)"
,colorEnd = "rgb(68,84,137)"
,colorStartPos = 0
,colorMiddlePos = 50
,colorEndPos = 100
)
,sidebarTabTextColorSelected = "rgb(255,255,255)"
,sidebarTabRadiusSelected = "30px"
,sidebarTabBackColorHover = cssGradientThreeColors(
direction = "right"
,colorStart = "rgb(56,137,189)"
,colorMiddle = "rgb(65,95,145)"
,colorEnd = "rgb(68,84,137)"
,colorStartPos = 0
,colorMiddlePos = 50
,colorEndPos = 100
)
,sidebarTabTextColorHover = "rgb(255,255,255)"
,sidebarTabBorderStyleHover = "none"
,sidebarTabBorderColorHover = "none"
,sidebarTabBorderWidthHover = 0
,sidebarTabRadiusHover = "30px"
### boxes
,boxBackColor = cssGradientThreeColors(
direction = "right"
,colorStart = "rgb(70,75,125)"
,colorMiddle = "rgb(65,79,129)"
,colorEnd = "rgb(55,70,120)"
,colorStartPos = 0
,colorMiddlePos = 30
,colorEndPos = 100
)
,boxBorderRadius = 15
,boxShadowSize = "0px 0px 0px"
,boxShadowColor = ""
,boxTitleSize = 16
,boxDefaultColor = "rgb(49,56,107)"
,boxPrimaryColor = "rgb(141,192,241)"
,boxInfoColor = "rgb(20,100,160)"
,boxSuccessColor = "rgb(64,186,170)"
,boxWarningColor = "rgb(255,217,144)"
,boxDangerColor = "rgb(249,144,144)"
,tabBoxTabColor = "rgb(80,95,155)"
,tabBoxTabTextSize = 14
,tabBoxTabTextColor = "rgb(128,177,221)"
,tabBoxTabTextColorSelected = "rgb(255,255,255)"
,tabBoxBackColor = cssGradientThreeColors(
direction = "right"
,colorStart = "rgb(70,75,125)"
,colorMiddle = "rgb(65,79,129)"
,colorEnd = "rgb(55,70,120)"
,colorStartPos = 0
,colorMiddlePos = 30
,colorEndPos = 100
)
,tabBoxHighlightColor = "rgb(80,95,155)"
,tabBoxBorderRadius = 15
### inputs
,buttonBackColor = "rgb(72,190,229)"
,buttonTextColor = "rgb(40,63,106)"
,buttonBorderColor = "rgb(72,190,229)"
,buttonBorderRadius = 20
,buttonBackColorHover = "rgb(115,210,240)"
,buttonTextColorHover = "rgb(255,255,255)"
,buttonBorderColorHover = "rgb(115,210,240)"
,textboxBackColor = "rgb(40,70,115)"
,textboxBorderColor = "rgb(30,60,105)"
,textboxBorderRadius = 20
,textboxBackColorSelect = "rgb(40,70,115)"
,textboxBorderColorSelect = "rgb(30,60,105)"
### tables
,tableBackColor = "transparent"
,tableBorderColor = "rgb(80,95,155)"
,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.