Title: | colour palettes from some 90s pop album covers |
---|---|
Description: | colour palettes based on pop album and single covers. Contains a mix of sequential and qualitative palettes. |
Authors: | John MacKintosh [aut, cre] |
Maintainer: | John MacKintosh <[email protected]> |
License: | GPL (>= 3) |
Version: | 0.0.0.9000 |
Built: | 2024-11-10 05:30:56 UTC |
Source: | https://github.com/johnmackintosh/popthemes |
aqua palette
aqua_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_aqua(n, type = "discrete", reverse = FALSE, ...) scale_colour_aqua(n, type = "discrete", reverse = FALSE, ...) scale_fill_aqua(n, type = "discrete", reverse = FALSE, ...)
aqua_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_aqua(n, type = "discrete", reverse = FALSE, ...) scale_colour_aqua(n, type = "discrete", reverse = FALSE, ...) scale_fill_aqua(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(aqua_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_aqua() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_aqua() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_aqua()
library(scales) show_col(aqua_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_aqua() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_aqua() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_aqua()
bangles palette
bangles_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_bangles(n, type = "discrete", reverse = FALSE, ...) scale_colour_bangles(n, type = "discrete", reverse = FALSE, ...) scale_fill_bangles(n, type = "discrete", reverse = FALSE, ...)
bangles_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_bangles(n, type = "discrete", reverse = FALSE, ...) scale_colour_bangles(n, type = "discrete", reverse = FALSE, ...) scale_fill_bangles(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(bangles_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_bangles() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_bangles() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_bangles()
library(scales) show_col(bangles_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_bangles() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_bangles() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_bangles()
beck palette
beck_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_beck(n, type = "discrete", reverse = FALSE, ...) scale_colour_beck(n, type = "discrete", reverse = FALSE, ...) scale_fill_beck(n, type = "discrete", reverse = FALSE, ...)
beck_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_beck(n, type = "discrete", reverse = FALSE, ...) scale_colour_beck(n, type = "discrete", reverse = FALSE, ...) scale_fill_beck(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(beck_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_beck() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_beck() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_beck()
library(scales) show_col(beck_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_beck() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_beck() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_beck()
boo palette
boo_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_boo(n, type = "discrete", reverse = FALSE, ...) scale_colour_boo(n, type = "discrete", reverse = FALSE, ...) scale_fill_boo(n, type = "discrete", reverse = FALSE, ...)
boo_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_boo(n, type = "discrete", reverse = FALSE, ...) scale_colour_boo(n, type = "discrete", reverse = FALSE, ...) scale_fill_boo(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(boo_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_boo() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_boo() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_boo()
library(scales) show_col(boo_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_boo() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_boo() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_boo()
bwitched palette
bwitched_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_bwitched(n, type = "discrete", reverse = FALSE, ...) scale_colour_bwitched(n, type = "discrete", reverse = FALSE, ...) scale_fill_bwitched(n, type = "discrete", reverse = FALSE, ...)
bwitched_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_bwitched(n, type = "discrete", reverse = FALSE, ...) scale_colour_bwitched(n, type = "discrete", reverse = FALSE, ...) scale_fill_bwitched(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(bwitched_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_bwitched() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_bwitched() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_bwitched()
library(scales) show_col(bwitched_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_bwitched() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_bwitched() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_bwitched()
deeelite palette
deeelite_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_deeelite(n, type = "discrete", reverse = FALSE, ...) scale_colour_deeelite(n, type = "discrete", reverse = FALSE, ...) scale_fill_deeelite(n, type = "discrete", reverse = FALSE, ...)
deeelite_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_deeelite(n, type = "discrete", reverse = FALSE, ...) scale_colour_deeelite(n, type = "discrete", reverse = FALSE, ...) scale_fill_deeelite(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(deeelite_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_deeelite() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_deeelite() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_deeelite()
library(scales) show_col(deeelite_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_deeelite() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_deeelite() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_deeelite()
kelly palette
kelly_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_kelly(n, type = "discrete", reverse = FALSE, ...) scale_colour_kelly(n, type = "discrete", reverse = FALSE, ...) scale_fill_kelly(n, type = "discrete", reverse = FALSE, ...)
kelly_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_kelly(n, type = "discrete", reverse = FALSE, ...) scale_colour_kelly(n, type = "discrete", reverse = FALSE, ...) scale_fill_kelly(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(kelly_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_kelly() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_kelly() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_kelly()
library(scales) show_col(kelly_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_kelly() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_kelly() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_kelly()
nodoubt palette
nodoubt_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_nodoubt(n, type = "discrete", reverse = FALSE, ...) scale_colour_nodoubt(n, type = "discrete", reverse = FALSE, ...) scale_fill_nodoubt(n, type = "discrete", reverse = FALSE, ...)
nodoubt_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_nodoubt(n, type = "discrete", reverse = FALSE, ...) scale_colour_nodoubt(n, type = "discrete", reverse = FALSE, ...) scale_fill_nodoubt(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(nodoubt_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_nodoubt() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_nodoubt() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_nodoubt()
library(scales) show_col(nodoubt_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_nodoubt() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_nodoubt() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_nodoubt()
R package that contains color palettes based on pop album covers. See also: https://github.com/johnmackintosh/metallicaRt for metallica palettes
pop_palette(name, n, type = c("discrete", "continuous"))
pop_palette(name, n, type = c("discrete", "continuous"))
name |
Name of palette. Select one:
|
n |
Number of colors desired. |
type |
Either continuous or discrete. |
and https://github.com/johnmackintosh/rockthemes for rock palettes
A vector of colors.
pop_palette("aqua")
pop_palette("aqua")
rickroll palette
rickroll_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_rickroll(n, type = "discrete", reverse = FALSE, ...) scale_colour_rickroll(n, type = "discrete", reverse = FALSE, ...) scale_fill_rickroll(n, type = "discrete", reverse = FALSE, ...)
rickroll_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_rickroll(n, type = "discrete", reverse = FALSE, ...) scale_colour_rickroll(n, type = "discrete", reverse = FALSE, ...) scale_fill_rickroll(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(rickroll_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_rickroll() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_rickroll() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_rickroll()
library(scales) show_col(rickroll_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_rickroll() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_rickroll() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_rickroll()
sclub palette
sclub_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_sclub(n, type = "discrete", reverse = FALSE, ...) scale_colour_sclub(n, type = "discrete", reverse = FALSE, ...) scale_fill_sclub(n, type = "discrete", reverse = FALSE, ...)
sclub_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_sclub(n, type = "discrete", reverse = FALSE, ...) scale_colour_sclub(n, type = "discrete", reverse = FALSE, ...) scale_fill_sclub(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(sclub_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_sclub() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_sclub() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_sclub()
library(scales) show_col(sclub_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_sclub() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_sclub() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_sclub()
spice palette
spice_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_spice(n, type = "discrete", reverse = FALSE, ...) scale_colour_spice(n, type = "discrete", reverse = FALSE, ...) scale_fill_spice(n, type = "discrete", reverse = FALSE, ...)
spice_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_spice(n, type = "discrete", reverse = FALSE, ...) scale_colour_spice(n, type = "discrete", reverse = FALSE, ...) scale_fill_spice(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(spice_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_spice() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_spice() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_spice()
library(scales) show_col(spice_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_spice() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_spice() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_spice()
steps_h palette
steps_h_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_steps_h(n, type = "discrete", reverse = FALSE, ...) scale_colour_steps_h(n, type = "discrete", reverse = FALSE, ...) scale_fill_steps_h(n, type = "discrete", reverse = FALSE, ...)
steps_h_pal(n, type = c("discrete", "continuous"), reverse = FALSE) scale_color_steps_h(n, type = "discrete", reverse = FALSE, ...) scale_colour_steps_h(n, type = "discrete", reverse = FALSE, ...) scale_fill_steps_h(n, type = "discrete", reverse = FALSE, ...)
n |
number of colors |
type |
discrete or continuous |
reverse |
reverse order, Default: FALSE |
... |
Arguments passed on to
|
library(scales) show_col(steps_h_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_steps_h() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_steps_h() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_steps_h()
library(scales) show_col(steps_h_pal()(9)) library(ggplot2) ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_color_steps_h() ggplot(airquality, aes(x = Day, y = Temp, group = as.factor(Month), color = as.factor(Month))) + geom_point(size = 2.5) + scale_colour_steps_h() ggplot(mpg, aes(displ)) + geom_histogram(aes(fill = class), col = "black", size = 0.1) + scale_fill_steps_h()