Skip to content

karthik/wesanderson

Repository files navigation

Wes Anderson Palettes

Build Status
CRAN Downloads

I saved you from boring plots. What did you ever do? - Max Fischer (probably)

Tired of generic mass produced palettes for your plots? Short of adding an owl and dressing up your plot in a bowler hat, here’s the most indie thing you can do to one. First round of palettes derived from the amazing Tumblr blog Wes Anderson Palettes.

Installation

install.packages("wesanderson")

Or the development version

devtools::install_github("karthik/wesanderson")

Usage

library("wesanderson")

# See all palettes
names(wes_palettes)
#>  [1] "BottleRocket1"  "BottleRocket2"  "Rushmore1"      "Rushmore"      
#>  [5] "Royal1"         "Royal2"         "Zissou1"        "Darjeeling1"   
#>  [9] "Darjeeling2"    "Chevalier1"     "FantasticFox1"  "Moonrise1"     
#> [13] "Moonrise2"      "Moonrise3"      "Cavalcanti1"    "GrandBudapest1"
#> [17] "GrandBudapest2" "IsleofDogs1"    "IsleofDogs2"    "FrenchDispatch"
#> [21] "AsteroidCity1"  "AsteroidCity2"  "AsteroidCity3"

Palettes

Bottle Rocket (1996)

wes_palette("BottleRocket1")

wes_palette("BottleRocket2")

Rushmore (1998)

wes_palette("Rushmore1")

The Royal Tenenbaums (2001)

wes_palette("Royal1")

wes_palette("Royal2")

library("ggplot2")
ggplot(mtcars, aes(factor(cyl), fill=factor(vs))) +  geom_bar() +
  scale_fill_manual(values = wes_palette("Royal1"))

The Life Aquatic with Steve Zissou (2004)

wes_palette("Zissou1")

pal <- wes_palette("Zissou1", 21, type = "continuous")
image(volcano, col = pal)

pal <- wes_palette("Zissou1", 100, type = "continuous")
# heatmap is a local dataset
ggplot(heatmap, aes(x = X2, y = X1, fill = value)) +
  geom_tile() + 
  scale_fill_gradientn(colours = pal) + 
  scale_x_discrete(expand = c(0, 0)) +
  scale_y_discrete(expand = c(0, 0)) + 
  coord_equal() 

The Darjeeling Limited (2007)

wes_palette("Darjeeling1")

wes_palette("Darjeeling2")

Hotel Chevalier (2007)

wes_palette("Chevalier1")

Fantastic Mr. Fox (2009)

wes_palette("FantasticFox1")

Moonrise Kingdom (2012)

wes_palette("Moonrise1")

wes_palette("Moonrise2")

wes_palette("Moonrise3")

Castello Cavalcanti (2013)

wes_palette("Cavalcanti1")

The Grand Budapest Hotel (2014)

wes_palette("GrandBudapest1")

wes_palette("GrandBudapest2")

The Isle of Dogs (2018)

wes_palette("IsleofDogs1")

wes_palette("IsleofDogs2")

The French Distpatch (2021)

wes_palette("FrenchDispatch")

Asteroid City (2023)

wes_palette("AsteroidCity1")

wes_palette("AsteroidCity2")

wes_palette("AsteroidCity3")

As seen in these publications

Imgur

Imgur

Imgur

Imgur

Imgur

Imgur