library(ggplot2)
ggplot(mtcars, aes(factor(cyl), mpg, fill = factor(cyl))) +
geom_boxplot() +
scale_fill_nhl("kraken") # Seattle Kraken
ggplot(mtcars, aes(wt, mpg, colour = hp)) +
geom_point(size = 3) +
scale_colour_nhl("kraken", discrete = FALSE)
Run the code above in your browser using DataLab