dichromat (version 2.0-0.1)

colorschemes: Color Schemes

Description

17 color schemes suitable for people with deficient or anomalous red-green vision.

Usage

colorschemes

Format

• BrowntoBlue.10

• BrowntoBlue.12

• BluetoDarkOrange.12

• BluetoDarkOrange.18

• DarkRedtoBlue.12

• DarkRedtoBlue.18

• BluetoGreen.14

• BluetoGray.8

• BluetoOrangeRed.14

• BluetoOrange.10

• BluetoOrange.12

• BluetoOrange.8

• LightBluetoDarkBlue.10

• LightBluetoDarkBlue.7

• Categorical.12

• GreentoMagenta.16

• SteppedSequential.5

Author

Scott Waichler <[e-mail]>

References

Light A, Bartlein PJ (2004). The End of the Rainbow? Color Schemes for Improved Data Graphics. EOS Transactions of the American Geophysical Union, 85(40), 385.

Examples

pal <- function(col, ...)
  image(seq_along(col), 1, matrix(seq_along(col), ncol = 1),
  col = col, axes = FALSE, ...)

opar <- par(mar = c(1, 2, 1, 1))
layout(matrix(1:6, ncol = 1))
pal(colorschemes$BrowntoBlue.10, main = "Brown to Blue (10)")
pal(colorRampPalette(colorschemes$BrowntoBlue.10, space = "Lab")(100),
  main = "Brown to Blue Ramp")
pal(dichromat(colorschemes$BrowntoBlue.10),
  main = "Brown to Blue (10) -- deuteranopia")
pal(colorschemes$Categorical.12, main = "Categorical (12)")
pal(dichromat(colorschemes$Categorical.12),
  main = "Categorical (12) -- deuteranopia")
pal(dichromat(colorschemes$Categorical.12, "protan"),
  main = "Categorical (12) -- protanopia")
par(opar)