R/corporateIdentity.R

In HCIC/r-tools: Supplies tools for analysis in psychological surveys

#' rwth.colorplette
#'
#' @return List of RWTH Colors (2018)
#' @export
#'
rwth.colorpalette <- function(){
  list(blue = rgb2hex(0,84,159),
       lightblue = rgb2hex(142,186,229),
       black= rgb2hex(0,0,0),
       magenta = rgb2hex(227,0,102),
       yellow = rgb2hex(255,237,0),
       petrol = rgb2hex(0,97,101),
       turquois = rgb2hex(0,152,161),
       green = rgb2hex(87,171,39),
       maygreen = rgb2hex(189,205,0),
       orange = rgb2hex(246,168,0),
       red = rgb2hex(204,7,30),
       bordeaux = rgb2hex(161,16,53),
       violet = rgb2hex(97,33,88),
       purple = rgb2hex(122,111,172)
  )
}