synesthesia: Synesthesia color palette

View source: R/palettes-synesthesia.R

synesthesiaR Documentation

Synesthesia color palette

Description

Four color gradient defined by purple, blue, green, orange.

Usage

synesthesia(
  n = 256L,
  palette = c("lightPalette", "darkPalette", "draculaPalette", "macOSLightPalette",
    "macOSDarkPalette", "iOSLightPalette", "iOSDarkPalette")
)

synesthesia_pal(
  palette = c("lightPalette", "darkPalette", "draculaPalette", "macOSLightPalette",
    "macOSDarkPalette", "iOSLightPalette", "iOSDarkPalette")
)

scale_colour_synesthesia_c(
  ...,
  na.value = "grey50",
  guide = "colourbar",
  palette = c("lightPalette", "darkPalette", "draculaPalette", "macOSLightPalette",
    "macOSDarkPalette", "iOSLightPalette", "iOSDarkPalette")
)

acid_scale_color_synesthesia_c(
  ...,
  na.value = "grey50",
  guide = "colourbar",
  palette = c("lightPalette", "darkPalette", "draculaPalette", "macOSLightPalette",
    "macOSDarkPalette", "iOSLightPalette", "iOSDarkPalette")
)

scale_colour_synesthesia_d(
  ...,
  palette = c("lightPalette", "darkPalette", "draculaPalette", "macOSLightPalette",
    "macOSDarkPalette", "iOSLightPalette", "iOSDarkPalette")
)

acid_scale_color_synesthesia_d(
  ...,
  palette = c("lightPalette", "darkPalette", "draculaPalette", "macOSLightPalette",
    "macOSDarkPalette", "iOSLightPalette", "iOSDarkPalette")
)

acid_scale_fill_synesthesia_c(
  ...,
  na.value = "grey50",
  guide = "colourbar",
  palette = c("lightPalette", "darkPalette", "draculaPalette", "macOSLightPalette",
    "macOSDarkPalette", "iOSLightPalette", "iOSDarkPalette")
)

acid_scale_fill_synesthesia_d(
  ...,
  palette = c("lightPalette", "darkPalette", "draculaPalette", "macOSLightPalette",
    "macOSDarkPalette", "iOSLightPalette", "iOSDarkPalette")
)

Arguments

n

integer(1). The number of colors (>= 1) to be in the palette.

palette

character(1). Color palette name.

...

Additional arguments.

na.value

character(1). Missing values will be replaced with this value.

guide

character(1) or function. A function used to create a guide or its name. See ggplot2::guides for details.

Details

A little bit of an acid trip, especially when used for heatmaps.

Value

character or ggproto.

Note

Updated 2022-05-24.

See Also

Adapted from viridis color palette:

  • viridis::viridis().

  • viridis::viridis_pal().

  • viridis::scale_color_viridis_c().

  • viridis::scale_color_viridis_d().

  • viridis::scale_fill_viridis_c().

  • viridis::scale_fill_viridis_d().

Useful color palette URLs:

  • http://www.stat.columbia.edu/~tzheng/files/Rcolor.pdf

  • https://matplotlib.org/tutorials/colors/colormaps.html

  • http://colorbrewer2.org/

  • http://colorspace.r-forge.r-project.org/

  • http://hclwizard.org/

  • https://developer.apple.com/design/human-interface-guidelines/

  • https://blog.datawrapper.de/colors-for-data-vis-style-guides/

Additional color palette functions that may be relevant:

  • grDevices::hsv(), grDevices::rgb(), grDevices::col2rgb().

  • gplots::col2hex().

  • ggplot2::continuous_scale(), ggplot2::discrete_scale().

  • scales::gradient_n_pal().

  • Seurat::CustomPalette(), Seurat::PurpleAndYellow().

  • colorRamps::matlab.like(), colorRamps::matlab.like2().

  • RColorBrewer::display.brewer.all().

  • viridisLite::viridis.map.

Examples

suppressPackageStartupMessages({
    library(ggplot2)
})

## Color, continuous.
cc <- ggplot(mpg, aes(cty, hwy)) +
    geom_jitter(aes(color = hwy))
cc + acid_scale_color_synesthesia_c()

## Color, discrete.
cd <- ggplot(mpg, aes(fl)) +
    geom_bar(aes(color = fl), fill = NA)
cd + acid_scale_color_synesthesia_d()

## Fill, continuous.
fc <- ggplot(diamonds, aes(carat, price)) +
    geom_hex()
fc + acid_scale_fill_synesthesia_c()

## Fill, discrete.
fd <- ggplot(mpg, aes(fl)) +
    geom_bar(aes(fill = fl))
fd + acid_scale_fill_synesthesia_d()

## Base color.
par(mar = rep(2.5, times = 4L))
image(
    matrix(data = seq_len(100L), nrow = 10, ncol = 10),
    col = synesthesia()
)

acidgenomics/acidplots documentation built on April 1, 2024, 7:37 p.m.