ggpubfigs is a ggplot2 extension that helps create publication ready figures for the life sciences.
Importantly, ggpubfigs implements themes and color palettes that are both aesthetically pleasing and colorblind friendly.
If you found ggpubfigs helpful, please cite: ggpubfigs: Colorblind-Friendly Color Palettes and ggplot2
Graphic System Extensions for Publication-Quality Scientific
Figures. DOI: 10.1128/MRA.00871-21
Install
Quick Start
Color palettes
Table of Hex Codes
Themes
FAQ
Acknowledgements
# execute this command only the first time you use ggpubfigs
devtools::install_github("JLSteenwyk/ggpubfigs")
# load ggpubfigs
library(ggpubfigs)These quick start examples demonstrate how to implement two aesthetically pleasing themes and color palettes.
# using the "ito_seven" color palette and theme_big_simple()
ggplot(mtcars, aes(factor(carb), fill=factor(cyl))) + geom_bar() + scale_fill_manual(values = friendly_pal("ito_seven")) + theme_big_simple()
# using the "bright_seven" color palette and theme_big_grid()
ggplot(mtcars, aes(factor(carb), fill=factor(cyl))) + geom_bar() + scale_fill_manual(values = friendly_pal("bright_seven")) + theme_big_grid()
Color palettes are all colorblind friendly. Thus, your figures will be accessible to more people, which is inarguably better for your audience and you.
Color palettes are named using the following scheme: identifier (underscore) number of colors in color palette.
To use these colorblind friendly color palettes, use the following command as an example for both discrete and continuous purposes:
ggplot(mtcars, aes(factor(carb), fill=factor(cyl))) + geom_bar() + scale_fill_manual(values = friendly_pal("contrast_three"))
pal <- friendly_pal("contrast_three", 50, type = "continuous")
image(volcano, col = pal)
| Palettes | Colors used |
|---|---|
| bright_seven | #4477AA, #228833, #AA3377, #BBBBBB, #66CCEE, #CCBB44, #EE6677 |
| contrast_three | #004488, #BB5566, #DDAA33 |
| vibrant_seven | #0077BB, #EE7733, #33BBEE, #CC3311, #009988, #EE3377, #BBBBBB |
| muted_nine | #332288, #117733, #CC6677, #88CCEE, #999933, #882255, #44AA99, #DDCC77, #AA4499 |
| nickel_five | #648FFF, #FE6100, #785EF0, #FFB000, #DC267F |
| ito_seven | #0072B2, #D55E00, #009E73, #CC79A7, #56B4E9, #E69F00, #F0E442 |
| ibm_five | #648FFF, #785EF0, #DC267F, #FE6100, #FFB000 |
| wong_eight | #E69F00, #56B4E9, #009E73, #F0E442, #0072B2, #D55E00, #CC79A7, #000000 |
| tol_eight | #332288, #117733, #44AA99, #88CCEE, #DDCC77, #CC6677, #AA4499, #882255 |
| zesty_four | #F5793A, #A95AA1, #85C0F9, #0F2080 |
| retro_four | #601A4A, #EE442F, #63ACBE, #F9F4EC |
theme_grid()
ggplot(iris, aes(Sepal.Length, Petal.Width, color = Species)) + geom_point() + theme_grid()
ggplot(iris, aes(Sepal.Length, fill = Species)) + geom_histogram() + theme_grid()
theme_big_grid()
ggplot(iris, aes(Sepal.Length, Petal.Width, color = Species)) + geom_point() + theme_big_grid()
ggplot(iris, aes(Sepal.Length, fill = Species)) + geom_histogram() + theme_big_grid()
theme_simple()
ggplot(iris, aes(Sepal.Length, Petal.Width, color = Species)) + geom_point() + theme_simple()
ggplot(iris, aes(Sepal.Length, fill = Species)) + geom_histogram() + theme_simple()
theme_big_simple()
ggplot(iris, aes(Sepal.Length, Petal.Width, color = Species)) + geom_point() + theme_big_simple()
ggplot(iris, aes(Sepal.Length, fill = Species)) + geom_histogram() + theme_big_simple()
theme_grey()
ggplot(iris, aes(Sepal.Length, Petal.Width, color = Species)) + geom_point() + theme_grey()
ggplot(iris, aes(Sepal.Length, fill = Species)) + geom_histogram() + theme_grey()
theme_black()
ggplot(iris, aes(Sepal.Length, Petal.Width, color = Species)) + geom_point() + theme_black()
ggplot(iris, aes(Sepal.Length, fill = Species)) + geom_histogram() + theme_black()
theme_blue()
ggplot(iris, aes(Sepal.Length, Petal.Width, color = Species)) + geom_point() + theme_blue()
ggplot(iris, aes(Sepal.Length, fill = Species)) + geom_histogram() + theme_blue()
theme_red()
ggplot(iris, aes(Sepal.Length, Petal.Width, color = Species)) + geom_point() + theme_red()
ggplot(iris, aes(Sepal.Length, fill = Species)) + geom_histogram() + theme_red()
Can I submit color palettes or themes to be incorporated into ggpubfigs?
Yes! Submissions are encouraged, please feel free to contact me via twitter or from my contact information.
I would like to thank the blooming R community for all the very helpful online forums, discussions, and open source books that have helped me learn R.
I would also like to acknowledge that some of the example usage and color palette code was developed based on open source code from the wes anderson color palette package.