knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/figures/README-", fig.height = 3, out.width = "100%", dpi = 150, message = FALSE, warning = FALSE, error = FALSE, dev.args = list(type = "cairo") )
The trekcolors
package provides a collection of color palettes based on Star Trek. It also offers functions for custom palettes and scale_*
functions for use with ggplot2
.
Install the CRAN release of trekcolors
with
install.packages("trekcolors")
Install the development version from GitHub with
# install.packages("remotes") remotes::install_github("leonawicz/trekcolors")
library(trekcolors) library(ggplot2) trek_pal("starfleet") trek_pal("lcars_2357") lcars_pal("2357") # there are some special functions for LCARS colors
Preview the starfleet
and lcars_2357
palettes.
view_trek_pals(c("starfleet", "lcars_2357"))
p <- ggplot(iris, aes(Sepal.Width, Sepal.Length, color = Species)) + geom_point(size = 5, alpha = 0.75) p + scale_color_trek() # starfleet is default palette p <- ggplot(diamonds, aes(carat, price, color = clarity)) + geom_point() p + scale_color_lcars("2357") # equivalent to scale_color_trek("lcars_2357") p <- ggplot(diamonds, aes(carat, stat(count), fill = cut)) + geom_density(position = "fill") p + scale_fill_trek("klingon") p + scale_fill_trek("romulan") p + scale_fill_trek("andorian") p <- ggplot(diamonds, aes(carat, stat(count), fill = cut)) + geom_density(position = "fill") p + scale_fill_lcars("2357") p + scale_fill_lcars1("atomic-tangerine", dark = TRUE) p + scale_fill_lcars2("pale-canary", "danub") d <- diamonds[diamonds$cut >= "Very Good", ] p <- ggplot(d, aes(carat, stat(count), fill = cut)) + geom_density(position = "fill") p + scale_fill_trek("starfleet")
The four LCARS palettes that have a year in their series name are special in that these official standard LCARS colors have formal names.
# lcars_pals() # print list of all LCARS palettes lcars_colors() # full set of unique names across the four palettes lcars_2357() # specific color series; also 2369, 2375, 2379 lcars_2357("lilac", "mariner") # select by name
In addition to these and all the other predefined palettes, custom palettes can be constructed using official LCARS color names. This is like colorRampPalette()
but with the ability to recognize official LCARS color names. This functionality was leveraged by scale_color_lcars1()
and scale_color_lcars2()
seen above when making sequential or divergent palettes based on specific LCARS colors for use with ggplot.
lcars_custom_pal <- lcars_colors_pal(c("pale-canary", "eggplant")) lcars_custom_pal(8) p <- ggplot(diamonds, aes(carat, stat(count), fill = cut)) + geom_density(position = "fill") p + scale_fill_lcars2("pale-canary", "danub") # p + scale_fill_manual(values = lcars_custom_pal(8)) # equivalent p + scale_fill_lcars2("pale-canary", "danub", divergent = TRUE) p + scale_fill_lcars2("pale-canary", "danub", dark = TRUE, divergent = TRUE)
# See available palette names trek_pal() # view all predefined palettes view_trek_pals()
Matthew Leonawicz (r substr(Sys.Date(), 1, 4)
). trekcolors: Star Trek Color Palettes. R package version 0.2.0. https://CRAN.R-project.org/package=trekcolors
Contributions are welcome. Contribute through GitHub via pull request. Please create an issue first if it is regarding any substantive feature add or change.
Please note that the trekcolors
project is released with a Contributor Code of Conduct. By contributing to this project, you agree to abide by its terms.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.