Ecosyste.ms: Awesome

An open API service indexing awesome lists of open source software.

https://github.com/aljrico/harrypotter

🎨 Harry Potter inspired palette for R
https://github.com/aljrico/harrypotter

color-palette harry harry-potter package plot r

Last synced: 3 months ago
JSON representation

🎨 Harry Potter inspired palette for R

Lists

README 

        

# harrypotter 



[![cran version](http://www.r-pkg.org/badges/version/harrypotter)](https://cran.r-project.org/package=harrypotter)

[![rstudio mirror per-month downloads](http://cranlogs.r-pkg.org/badges/harrypotter)](https://github.com/metacran/cranlogs.app)

[![rstudio mirror total downloads](http://cranlogs.r-pkg.org/badges/grand-total/harrypotter?color=yellowgreen)](https://github.com/metacran/cranlogs.app)



This package provides the first round of palettes derived from the *Harry Potter* film series.



At its first version, it simply contains the palettes of the [Hogwarts](https://en.wikipedia.org/wiki/Hogwarts) Houses. They have been chosen manually, taking into account its consistency with all the existing branding of the franchise, but its suitability for data visualisation. 



> Most of us need to _listen_ to the music to understand how beautiful it is. But often that’s how statistics are presented: we show the notes instead of playing the music.



The colour palette should be beautiful, useful for plotting data and shoulr relate to desired style; in this case, should relate to the Harry Potter world. Some of the colours might change in future versions, in order to find this balance between suitability for plotting and relatable to the Harry Potter universe.






Installation

-------------



Just copy and execute this bunch of code and you'll have the last version of the package installed:



```r

install.packages("harrypotter")

```



And you can now use it:



```r

library(harrypotter)

```



Usage

-----



The default colour scale of the package is the one named **Always**. If you prefer to choose another one, you'll need to specify which house you want the palette from.



You can get started using base R plot functions, and the `hp()` function. Its first argument `n` lets you set the number of colours to be mapped. This way you can set different resolutions. Let's say that you want a palette made from the house **Gryffindor**, then just type `option = "Gryffindor"`. 



```r

pal <- hp(n = 8, house = "Gryffindor")

image(volcano, col = pal)



pal <- hp(n = 128, house = "Gryffindor")

image(volcano, col = pal)

```






## ggplot2



Of course, this package has specific functions to behave seamlessly with the best data visiualisation library available. 

The package contains colour scale functions for **ggplot2** plots: `scale_colour_hp()` and `scale_fill_hp()`. 



Here is a made up example using the colours from the house of **Hufflepuff**,



```r

library(ggplot2)

ggplot(data.frame(x = rnorm(1e4), y = rnorm(1e4)), aes(x = x, y = y)) +

  geom_hex() + 

	coord_fixed() +

  scale_fill_hp(house = "hufflepuff") + 

	theme_bw()

```






or more made-up heatmaps:






Using the same function we can also plot these cloropleth maps of U.S. unemployment:









### Discrete Scales



But what if you want discrete scales? These functions also can be used for discrete scales with the argument `discrete = TRUE`. This argument, when TRUE, sets a finite number of sufficiently spaced colours within the selected palette to plot your data.



```r

ggplot(diamonds, aes(factor(color), fill=factor(cut))) +

	geom_bar(colour = "black") +

	scale_fill_hp(discrete = TRUE, option = "ronweasley2", name = "Cut") +

	ylab("") +

	xlab("Colour") +

	coord_flip()

```






You can also use discrete scales by adding `_d()` at the end of it instead, like `scale_fill_hp_d()`.



```r

dsamp <- diamonds[sample(nrow(diamonds), 1000), ]

ggplot(dsamp, aes(carat, price)) +

	geom_point(aes(colour = clarity)) +

	scale_colour_hp_d(option = "LunaLovegood", name = "Clarity") +

	xlab("Carat") +

	ylab("Price")

```






Don't forget to try them all.






# Palettes



```r

option = "Mischief"

```




---



```r

option = "Always"

```






---



```r

option = "Sprout"

```






---



```r

option = "LunaLovegood"

```






---



```r

option = "HermioneGranger"

```






---



```r

option = "HarryPotter"

```






---



```r

option = "DracoMalfoy"

```






---



```r

option = "RonWeasley"

```






---



```r

option = "NewtScamander"

```






---



```r

option = "Ravenclaw"

```






# Acknowledgments



* Special thanks to my buddy [Alfredo](https://aldomann.com) for designing the logo.