palettes and patchwork

pals.R

# devtools::install_github("thomasp85/patchwork")

library(patchwork)
library(paletteer)
library(ggplot2)

ggplot(mtcars, aes(mpg, disp, colour = factor(cyl))) + 
  geom_point() + 
  scale_colour_paletteer_d('palettetown', 'spearow') +
  ggtitle('Spearow loves mtcars') +
ggplot(mtcars, aes(mpg, hp, colour = factor(cyl))) + 
  geom_point() + 
  scale_colour_paletteer_d('yarrr', 'usualsuspects') +
  ggtitle('Keyser Söze loves mtcars')