In ekholme-ccps/ccpsr: Tools for Working with CCPS Data

knitr::opts_chunk$set(echo = FALSE, message = FALSE, warning = FALSE, fig.align = "center")

#loading useful packages
library(tidyverse)
library(ccpsr)
library(eemisc)
library(harrypotter) #for colors

#setting ggplot fill/color options
opts <- options(
  ggplot2.discrete.fill = list(
    harrypotter::hp(n = 2, option = "HermioneGranger"),
    harrypotter::hp(n = 3, option = "HermioneGranger"),
    harrypotter::hp(n = 7, option = "HermioneGranger")
  )
)

con <- ccpsr::set_con()

herm <- harrypotter::hp(n = 1, option = "HermioneGranger")

theme_set(theme_ee(size = 10))