R/palette.R

#' social_palette
#'
#' Palette with colors taken from social media logos
#'
#' @export

social_palette <- c(
  "#FB3958",
  "#FFC838",
  "#6DC993",
  "#458EFF",
  "#DED1C1",
  "#8134AF",
  "#CCCCFF",
  "#AAD450",
  "#9B6954",
  "#DD4B39",
  "#128C7E",
  "#F58529",
  "#007BB6",
  "#EA4C89",
  "#00ACED",
  "#BB0000",
  "#9E9E9E",
  "#FEDA77",
  "#515BD4",
  "#9146FF",
  "#34526F",
  "#C32AA3",
  "#DCF8C6",
  "#1ED760",
  "#A6B1B7",
  "#00A7CE",
  "#F94877",
  "#7289DA",
  "#F40083"
)

#' boolean_palette
#'
#' Red/grey palette named vector for boolean variables
#'
#' @export

boolean_palette <- c(`TRUE` = "red", `FALSE` = "grey")
amyh25/RFunctions documentation built on Aug. 26, 2023, 4:33 p.m.