In sciencificity/disneycolouR: Palettes for Disney colours

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

Disney Palettes

Palette Colours from a blog post here. Palette made following blog post here.

Installation

The development version

devtools::install_github("sciencificity/disneycolour")

Usage

library(disneycolour)
# See all palettes
names(disney_palettes)

# See number discrete values in "main" the combo palette
str_glue("The number of discrete colours in the `main` palette is: {length(disney_palettes[['main']])}")

# Examples taken from ?scale_colour_discrete and amended
dsamp <- diamonds[sample(nrow(diamonds), 1000), ]
(d <- ggplot(dsamp, aes(carat, price)) + geom_point(aes(colour = clarity)))
# Change scale to disney default
d + scale_colour_disney()
# Change scale to disney - `alice` palette
d + scale_colour_disney("alice")

# Lookup colours of one palette
disney_palettes[["cinderella"]]

# Another example taken from ?scale_colour_discrete and amended
miss <- factor(sample(c(NA, 1:5), nrow(mtcars), replace = TRUE))
ggplot(mtcars, aes(mpg, wt)) +
  geom_point(aes(colour = miss)) +
  scale_colour_disney(palette = "when_i_was_your_age", na.value = "black")