R/aesthetics.R

In ReverieNB/FMT-Package: This package contains function used to create MBQIP Reports by the Flex Monitoring Team

#' Base Blue.
#'
#' Commonly used default colors
#'
#' @export

base_blue <- "#1f78b4"

#' Base Two Color Palette.
#'
#' Commonly used default colors
#'
#' @export

base_two <- c("#1f78b4","#b2df8a")

#' Base Four Color Palette.
#'
#' Commonly used default colors
#'
#' @export

base_four <- c("#482677ff", "#2d708eff", "#20a387ff","#73d055ff")

#' Base Five Color Palette.
#'
#' Commonly used default colors
#'
#' @export

base_five <- c('#f0f9e8','#bae4bc','#7bccc4','#43a2ca','#0868ac')

#' Default Missing Color
#'
#' Commonly used default colors
#'
#' @export

na_color <- "#D0D0D0"

#' Default Red Heat Palette
#'
#' Commonly used default colors
#'
#' @export

heat_pal <- c("#FEF0D9", "#FDCC8A", "#FC8D59", "#E34A33", "#B30000") #from RCB OrRD, expand as needed

#' FMT Folder Path
#'
#' Commonly used default colors
#'
#' @export

fmt_folder <- "//files.umn.edu/sph/HPM/Projects/RHRC/RHRC_Flex/"

#' Not-in Operator
#'
#' Commonly used default colors
#'
#' @export

'%ni%' <- Negate('%in%')

#https://drsimonj.svbtle.com/creating-corporate-colour-palettes-for-ggplot2