R/RColorBrewer.R

Defines functions brewer.pal

.brewer_div_schemes <- c(
  "BrBG",
  "PiYG",
  "PRGn",
  "PuOr",
  "RdBu",
  "RdGy",
  "RdYlBu",
  "RdYlGn",
  "Spectral"
)

.brewer_qual_schemes <- c(
  "Accent",
  "Dark2",
  "Paired",
  "Pastel1",
  "Pastel2",
  "Set1",
  "Set2",
  "Set3"
)

.brewer_seq_schemes <- c(
  "Blues",
  "BuGn",
  "BuPu",
  "GnBu",
  "Greens",
  "Greys",
  "Oranges",
  "OrRd",
  "PuBu",
  "PuBuGn",
  "PuRd",
  "Purples",
  "RdPu",
  "Reds",
  "YlGn",
  "YlGnBu",
  "YlOrBr",
  "YlOrRd"
)

names(.brewer_div_schemes) <- .brewer_div_schemes
names(.brewer_qual_schemes) <- .brewer_qual_schemes
names(.brewer_seq_schemes) <- .brewer_seq_schemes

divnum <- setNames(rep(11L, length(.brewer_div_schemes)), .brewer_div_schemes)
qualnum <- setNames(c(8L, 8L, 12L, 9L, 8L, 9L, 8L, 12L), .brewer_qual_schemes)
seqnum <- setNames(rep(9L, length(.brewer_seq_schemes)), .brewer_seq_schemes)

.brewer_schemes <- c(
  .brewer_div_schemes,
  .brewer_qual_schemes,
  .brewer_seq_schemes
)
maxcolors <- c(divnum, qualnum, seqnum)

# ---------------------------------------------------------------------------
# Palette data: each palette is a list of length-(max_n - 2) matrices,
# where entry [[k]] gives the RGB matrix for n = k + 2 colours.
# ---------------------------------------------------------------------------
.brewer_data <- list(
  Accent = list(
    rgb(
      c(127, 190, 253),
      c(201, 174, 192),
      c(127, 212, 134),
      maxColorValue = 255
    ),
    rgb(
      c(127, 190, 253, 255),
      c(201, 174, 192, 255),
      c(127, 212, 134, 153),
      maxColorValue = 255
    ),
    rgb(
      c(127, 190, 253, 255, 56),
      c(201, 174, 192, 255, 108),
      c(127, 212, 134, 153, 176),
      maxColorValue = 255
    ),
    rgb(
      c(127, 190, 253, 255, 56, 240),
      c(201, 174, 192, 255, 108, 2),
      c(127, 212, 134, 153, 176, 127),
      maxColorValue = 255
    ),
    rgb(
      c(127, 190, 253, 255, 56, 240, 191),
      c(201, 174, 192, 255, 108, 2, 91),
      c(127, 212, 134, 153, 176, 127, 23),
      maxColorValue = 255
    ),
    rgb(
      c(127, 190, 253, 255, 56, 240, 191, 102),
      c(201, 174, 192, 255, 108, 2, 91, 102),
      c(127, 212, 134, 153, 176, 127, 23, 102),
      maxColorValue = 255
    )
  ),

  Blues = list(
    rgb(
      c(222, 158, 49),
      c(235, 202, 130),
      c(247, 225, 189),
      maxColorValue = 255
    ),
    rgb(
      c(239, 189, 107, 33),
      c(243, 215, 174, 113),
      c(255, 231, 214, 181),
      maxColorValue = 255
    ),
    rgb(
      c(239, 189, 107, 49, 8),
      c(243, 215, 174, 130, 81),
      c(255, 231, 214, 189, 156),
      maxColorValue = 255
    ),
    rgb(
      c(239, 198, 158, 107, 49, 8),
      c(243, 219, 202, 174, 130, 81),
      c(255, 239, 225, 214, 189, 156),
      maxColorValue = 255
    ),
    rgb(
      c(239, 198, 158, 107, 66, 33, 8),
      c(243, 219, 202, 174, 146, 113, 69),
      c(255, 239, 225, 214, 198, 181, 148),
      maxColorValue = 255
    ),
    rgb(
      c(247, 222, 198, 158, 107, 66, 33, 8),
      c(251, 235, 219, 202, 174, 146, 113, 69),
      c(255, 247, 239, 225, 214, 198, 181, 148),
      maxColorValue = 255
    ),
    rgb(
      c(247, 222, 198, 158, 107, 66, 33, 8, 8),
      c(251, 235, 219, 202, 174, 146, 113, 81, 48),
      c(255, 247, 239, 225, 214, 198, 181, 156, 107),
      maxColorValue = 255
    )
  ),

  BrBG = list(
    rgb(
      c(216, 245, 90),
      c(179, 245, 180),
      c(101, 245, 172),
      maxColorValue = 255
    ),
    rgb(
      c(166, 223, 128, 1),
      c(97, 194, 205, 133),
      c(26, 125, 193, 113),
      maxColorValue = 255
    ),
    rgb(
      c(166, 223, 245, 128, 1),
      c(97, 194, 245, 205, 133),
      c(26, 125, 245, 193, 113),
      maxColorValue = 255
    ),
    rgb(
      c(140, 216, 246, 199, 90, 1),
      c(81, 179, 232, 234, 180, 102),
      c(10, 101, 195, 229, 172, 94),
      maxColorValue = 255
    ),
    rgb(
      c(140, 216, 246, 245, 199, 90, 1),
      c(81, 179, 232, 245, 234, 180, 102),
      c(10, 101, 195, 245, 229, 172, 94),
      maxColorValue = 255
    ),
    rgb(
      c(140, 191, 223, 246, 199, 128, 53, 1),
      c(81, 129, 194, 232, 234, 205, 151, 102),
      c(10, 45, 125, 195, 229, 193, 143, 94),
      maxColorValue = 255
    ),
    rgb(
      c(140, 191, 223, 246, 245, 199, 128, 53, 1),
      c(81, 129, 194, 232, 245, 234, 205, 151, 102),
      c(10, 45, 125, 195, 245, 229, 193, 143, 94),
      maxColorValue = 255
    ),
    rgb(
      c(84, 140, 191, 223, 246, 199, 128, 53, 1, 0),
      c(48, 81, 129, 194, 232, 234, 205, 151, 102, 60),
      c(5, 10, 45, 125, 195, 229, 193, 143, 94, 48),
      maxColorValue = 255
    ),
    rgb(
      c(84, 140, 191, 223, 246, 245, 199, 128, 53, 1, 0),
      c(48, 81, 129, 194, 232, 245, 234, 205, 151, 102, 60),
      c(5, 10, 45, 125, 195, 245, 229, 193, 143, 94, 48),
      maxColorValue = 255
    )
  ),

  BuGn = list(
    rgb(
      c(229, 153, 44),
      c(245, 216, 201),
      c(249, 201, 95),
      maxColorValue = 255
    ),
    rgb(
      c(237, 178, 102, 35),
      c(248, 226, 194, 139),
      c(251, 226, 164, 69),
      maxColorValue = 255
    ),
    rgb(
      c(237, 178, 102, 44, 0),
      c(248, 226, 194, 162, 109),
      c(251, 226, 164, 95, 44),
      maxColorValue = 255
    ),
    rgb(
      c(237, 204, 153, 102, 44, 0),
      c(248, 236, 216, 194, 162, 109),
      c(251, 230, 201, 164, 95, 44),
      maxColorValue = 255
    ),
    rgb(
      c(237, 204, 153, 102, 65, 35, 0),
      c(248, 236, 216, 194, 174, 139, 88),
      c(251, 230, 201, 164, 118, 69, 36),
      maxColorValue = 255
    ),
    rgb(
      c(247, 229, 204, 153, 102, 65, 35, 0),
      c(252, 245, 236, 216, 194, 174, 139, 88),
      c(253, 249, 230, 201, 164, 118, 69, 36),
      maxColorValue = 255
    ),
    rgb(
      c(247, 229, 204, 153, 102, 65, 35, 0, 0),
      c(252, 245, 236, 216, 194, 174, 139, 109, 68),
      c(253, 249, 230, 201, 164, 118, 69, 44, 27),
      maxColorValue = 255
    )
  ),

  BuPu = list(
    rgb(
      c(224, 158, 136),
      c(236, 188, 86),
      c(244, 218, 167),
      maxColorValue = 255
    ),
    rgb(
      c(237, 179, 140, 136),
      c(248, 205, 150, 65),
      c(251, 227, 198, 157),
      maxColorValue = 255
    ),
    rgb(
      c(237, 179, 140, 136, 129),
      c(248, 205, 150, 86, 15),
      c(251, 227, 198, 167, 124),
      maxColorValue = 255
    ),
    rgb(
      c(237, 191, 158, 140, 136, 129),
      c(248, 211, 188, 150, 86, 15),
      c(251, 230, 218, 198, 167, 124),
      maxColorValue = 255
    ),
    rgb(
      c(237, 191, 158, 140, 140, 136, 110),
      c(248, 211, 188, 150, 107, 65, 1),
      c(251, 230, 218, 198, 177, 157, 107),
      maxColorValue = 255
    ),
    rgb(
      c(247, 224, 191, 158, 140, 140, 136, 110),
      c(252, 236, 211, 188, 150, 107, 65, 1),
      c(253, 244, 230, 218, 198, 177, 157, 107),
      maxColorValue = 255
    ),
    rgb(
      c(247, 224, 191, 158, 140, 140, 136, 129, 77),
      c(252, 236, 211, 188, 150, 107, 65, 15, 0),
      c(253, 244, 230, 218, 198, 177, 157, 124, 75),
      maxColorValue = 255
    )
  ),

  Dark2 = list(
    rgb(c(27, 217, 117), c(158, 95, 112), c(119, 2, 179), maxColorValue = 255),
    rgb(
      c(27, 217, 117, 231),
      c(158, 95, 112, 41),
      c(119, 2, 179, 138),
      maxColorValue = 255
    ),
    rgb(
      c(27, 217, 117, 231, 102),
      c(158, 95, 112, 41, 166),
      c(119, 2, 179, 138, 30),
      maxColorValue = 255
    ),
    rgb(
      c(27, 217, 117, 231, 102, 230),
      c(158, 95, 112, 41, 166, 171),
      c(119, 2, 179, 138, 30, 2),
      maxColorValue = 255
    ),
    rgb(
      c(27, 217, 117, 231, 102, 230, 166),
      c(158, 95, 112, 41, 166, 171, 118),
      c(119, 2, 179, 138, 30, 2, 29),
      maxColorValue = 255
    ),
    rgb(
      c(27, 217, 117, 231, 102, 230, 166, 102),
      c(158, 95, 112, 41, 166, 171, 118, 102),
      c(119, 2, 179, 138, 30, 2, 29, 102),
      maxColorValue = 255
    )
  ),

  GnBu = list(
    rgb(
      c(224, 168, 67),
      c(243, 221, 162),
      c(219, 181, 202),
      maxColorValue = 255
    ),
    rgb(
      c(240, 186, 123, 43),
      c(249, 228, 204, 140),
      c(232, 188, 196, 190),
      maxColorValue = 255
    ),
    rgb(
      c(240, 186, 123, 67, 8),
      c(249, 228, 204, 162, 104),
      c(232, 188, 196, 202, 172),
      maxColorValue = 255
    ),
    rgb(
      c(240, 204, 168, 123, 67, 8),
      c(249, 235, 221, 204, 162, 104),
      c(232, 197, 181, 196, 202, 172),
      maxColorValue = 255
    ),
    rgb(
      c(240, 204, 168, 123, 78, 43, 8),
      c(249, 235, 221, 204, 179, 140, 88),
      c(232, 197, 181, 196, 211, 190, 158),
      maxColorValue = 255
    ),
    rgb(
      c(247, 224, 204, 168, 123, 78, 43, 8),
      c(252, 243, 235, 221, 204, 179, 140, 88),
      c(240, 219, 197, 181, 196, 211, 190, 158),
      maxColorValue = 255
    ),
    rgb(
      c(247, 224, 204, 168, 123, 78, 43, 8, 8),
      c(252, 243, 235, 221, 204, 179, 140, 104, 64),
      c(240, 219, 197, 181, 196, 211, 190, 172, 129),
      maxColorValue = 255
    )
  ),

  Greens = list(
    rgb(
      c(229, 161, 49),
      c(245, 217, 163),
      c(224, 155, 84),
      maxColorValue = 255
    ),
    rgb(
      c(237, 186, 116, 35),
      c(248, 228, 196, 139),
      c(233, 179, 118, 69),
      maxColorValue = 255
    ),
    rgb(
      c(237, 186, 116, 49, 0),
      c(248, 228, 196, 163, 109),
      c(233, 179, 118, 84, 44),
      maxColorValue = 255
    ),
    rgb(
      c(237, 199, 161, 116, 49, 0),
      c(248, 233, 217, 196, 163, 109),
      c(233, 192, 155, 118, 84, 44),
      maxColorValue = 255
    ),
    rgb(
      c(237, 199, 161, 116, 65, 35, 0),
      c(248, 233, 217, 196, 171, 139, 90),
      c(233, 192, 155, 118, 93, 69, 50),
      maxColorValue = 255
    ),
    rgb(
      c(247, 229, 199, 161, 116, 65, 35, 0),
      c(252, 245, 233, 217, 196, 171, 139, 90),
      c(245, 224, 192, 155, 118, 93, 69, 50),
      maxColorValue = 255
    ),
    rgb(
      c(247, 229, 199, 161, 116, 65, 35, 0, 0),
      c(252, 245, 233, 217, 196, 171, 139, 109, 68),
      c(245, 224, 192, 155, 118, 93, 69, 44, 27),
      maxColorValue = 255
    )
  ),

  Greys = list(
    rgb(c(240, 189, 99), c(240, 189, 99), c(240, 189, 99), maxColorValue = 255),
    rgb(
      c(247, 204, 150, 82),
      c(247, 204, 150, 82),
      c(247, 204, 150, 82),
      maxColorValue = 255
    ),
    rgb(
      c(247, 204, 150, 99, 37),
      c(247, 204, 150, 99, 37),
      c(247, 204, 150, 99, 37),
      maxColorValue = 255
    ),
    rgb(
      c(247, 217, 189, 150, 99, 37),
      c(247, 217, 189, 150, 99, 37),
      c(247, 217, 189, 150, 99, 37),
      maxColorValue = 255
    ),
    rgb(
      c(247, 217, 189, 150, 115, 82, 37),
      c(247, 217, 189, 150, 115, 82, 37),
      c(247, 217, 189, 150, 115, 82, 37),
      maxColorValue = 255
    ),
    rgb(
      c(255, 240, 217, 189, 150, 115, 82, 37),
      c(255, 240, 217, 189, 150, 115, 82, 37),
      c(255, 240, 217, 189, 150, 115, 82, 37),
      maxColorValue = 255
    ),
    rgb(
      c(255, 240, 217, 189, 150, 115, 82, 37, 0),
      c(255, 240, 217, 189, 150, 115, 82, 37, 0),
      c(255, 240, 217, 189, 150, 115, 82, 37, 0),
      maxColorValue = 255
    )
  ),

  Oranges = list(
    rgb(
      c(254, 253, 230),
      c(230, 174, 85),
      c(206, 107, 13),
      maxColorValue = 255
    ),
    rgb(
      c(254, 253, 253, 217),
      c(237, 190, 141, 71),
      c(222, 133, 60, 1),
      maxColorValue = 255
    ),
    rgb(
      c(254, 253, 253, 230, 166),
      c(237, 190, 141, 85, 54),
      c(222, 133, 60, 13, 3),
      maxColorValue = 255
    ),
    rgb(
      c(254, 253, 253, 253, 230, 166),
      c(237, 208, 174, 141, 85, 54),
      c(222, 162, 107, 60, 13, 3),
      maxColorValue = 255
    ),
    rgb(
      c(254, 253, 253, 253, 241, 217, 140),
      c(237, 208, 174, 141, 105, 72, 45),
      c(222, 162, 107, 60, 19, 1, 4),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 253, 253, 253, 241, 217, 140),
      c(245, 230, 208, 174, 141, 105, 72, 45),
      c(235, 206, 162, 107, 60, 19, 1, 4),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 253, 253, 253, 241, 217, 166, 127),
      c(245, 230, 208, 174, 141, 105, 72, 54, 39),
      c(235, 206, 162, 107, 60, 19, 1, 3, 4),
      maxColorValue = 255
    )
  ),

  OrRd = list(
    rgb(
      c(254, 253, 227),
      c(232, 187, 74),
      c(200, 132, 51),
      maxColorValue = 255
    ),
    rgb(
      c(254, 253, 252, 215),
      c(240, 204, 141, 48),
      c(217, 138, 89, 31),
      maxColorValue = 255
    ),
    rgb(
      c(254, 253, 252, 227, 179),
      c(240, 204, 141, 74, 0),
      c(217, 138, 89, 51, 0),
      maxColorValue = 255
    ),
    rgb(
      c(254, 253, 253, 252, 227, 179),
      c(240, 212, 187, 141, 74, 0),
      c(217, 158, 132, 89, 51, 0),
      maxColorValue = 255
    ),
    rgb(
      c(254, 253, 253, 252, 239, 215, 153),
      c(240, 212, 187, 141, 101, 48, 0),
      c(217, 158, 132, 89, 72, 31, 0),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 253, 253, 252, 239, 215, 153),
      c(247, 232, 212, 187, 141, 101, 48, 0),
      c(236, 200, 158, 132, 89, 72, 31, 0),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 253, 253, 252, 239, 215, 179, 127),
      c(247, 232, 212, 187, 141, 101, 48, 0, 0),
      c(236, 200, 158, 132, 89, 72, 31, 0, 0),
      maxColorValue = 255
    )
  ),

  Paired = list(
    rgb(
      c(166, 31, 178),
      c(206, 120, 223),
      c(227, 180, 138),
      maxColorValue = 255
    ),
    rgb(
      c(166, 31, 178, 51),
      c(206, 120, 223, 160),
      c(227, 180, 138, 44),
      maxColorValue = 255
    ),
    rgb(
      c(166, 31, 178, 51, 251),
      c(206, 120, 223, 160, 154),
      c(227, 180, 138, 44, 153),
      maxColorValue = 255
    ),
    rgb(
      c(166, 31, 178, 51, 251, 227),
      c(206, 120, 223, 160, 154, 26),
      c(227, 180, 138, 44, 153, 28),
      maxColorValue = 255
    ),
    rgb(
      c(166, 31, 178, 51, 251, 227, 253),
      c(206, 120, 223, 160, 154, 26, 191),
      c(227, 180, 138, 44, 153, 28, 111),
      maxColorValue = 255
    ),
    rgb(
      c(166, 31, 178, 51, 251, 227, 253, 255),
      c(206, 120, 223, 160, 154, 26, 191, 127),
      c(227, 180, 138, 44, 153, 28, 111, 0),
      maxColorValue = 255
    ),
    rgb(
      c(166, 31, 178, 51, 251, 227, 253, 255, 202),
      c(206, 120, 223, 160, 154, 26, 191, 127, 178),
      c(227, 180, 138, 44, 153, 28, 111, 0, 214),
      maxColorValue = 255
    ),
    rgb(
      c(166, 31, 178, 51, 251, 227, 253, 255, 202, 106),
      c(206, 120, 223, 160, 154, 26, 191, 127, 178, 61),
      c(227, 180, 138, 44, 153, 28, 111, 0, 214, 154),
      maxColorValue = 255
    ),
    rgb(
      c(166, 31, 178, 51, 251, 227, 253, 255, 202, 106, 255),
      c(206, 120, 223, 160, 154, 26, 191, 127, 178, 61, 255),
      c(227, 180, 138, 44, 153, 28, 111, 0, 214, 154, 153),
      maxColorValue = 255
    ),
    rgb(
      c(166, 31, 178, 51, 251, 227, 253, 255, 202, 106, 255, 177),
      c(206, 120, 223, 160, 154, 26, 191, 127, 178, 61, 255, 89),
      c(227, 180, 138, 44, 153, 28, 111, 0, 214, 154, 153, 40),
      maxColorValue = 255
    )
  ),

  Pastel1 = list(
    rgb(
      c(251, 179, 204),
      c(180, 205, 235),
      c(174, 227, 197),
      maxColorValue = 255
    ),
    rgb(
      c(251, 179, 204, 222),
      c(180, 205, 235, 203),
      c(174, 227, 197, 228),
      maxColorValue = 255
    ),
    rgb(
      c(251, 179, 204, 222, 254),
      c(180, 205, 235, 203, 217),
      c(174, 227, 197, 228, 166),
      maxColorValue = 255
    ),
    rgb(
      c(251, 179, 204, 222, 254, 255),
      c(180, 205, 235, 203, 217, 255),
      c(174, 227, 197, 228, 166, 204),
      maxColorValue = 255
    ),
    rgb(
      c(251, 179, 204, 222, 254, 255, 229),
      c(180, 205, 235, 203, 217, 255, 216),
      c(174, 227, 197, 228, 166, 204, 189),
      maxColorValue = 255
    ),
    rgb(
      c(251, 179, 204, 222, 254, 255, 229, 253),
      c(180, 205, 235, 203, 217, 255, 216, 218),
      c(174, 227, 197, 228, 166, 204, 189, 236),
      maxColorValue = 255
    ),
    rgb(
      c(251, 179, 204, 222, 254, 255, 229, 253, 242),
      c(180, 205, 235, 203, 217, 255, 216, 218, 242),
      c(174, 227, 197, 228, 166, 204, 189, 236, 242),
      maxColorValue = 255
    )
  ),

  Pastel2 = list(
    rgb(
      c(179, 253, 203),
      c(226, 205, 213),
      c(205, 172, 232),
      maxColorValue = 255
    ),
    rgb(
      c(179, 253, 203, 244),
      c(226, 205, 213, 202),
      c(205, 172, 232, 228),
      maxColorValue = 255
    ),
    rgb(
      c(179, 253, 203, 244, 230),
      c(226, 205, 213, 202, 245),
      c(205, 172, 232, 228, 201),
      maxColorValue = 255
    ),
    rgb(
      c(179, 253, 203, 244, 230, 255),
      c(226, 205, 213, 202, 245, 242),
      c(205, 172, 232, 228, 201, 174),
      maxColorValue = 255
    ),
    rgb(
      c(179, 253, 203, 244, 230, 255, 241),
      c(226, 205, 213, 202, 245, 242, 226),
      c(205, 172, 232, 228, 201, 174, 204),
      maxColorValue = 255
    ),
    rgb(
      c(179, 253, 203, 244, 230, 255, 241, 204),
      c(226, 205, 213, 202, 245, 242, 226, 204),
      c(205, 172, 232, 228, 201, 174, 204, 204),
      maxColorValue = 255
    )
  ),

  PiYG = list(
    rgb(
      c(233, 247, 161),
      c(163, 247, 215),
      c(201, 247, 106),
      maxColorValue = 255
    ),
    rgb(
      c(208, 241, 184, 77),
      c(28, 182, 225, 172),
      c(139, 218, 134, 38),
      maxColorValue = 255
    ),
    rgb(
      c(208, 241, 247, 184, 77),
      c(28, 182, 247, 225, 172),
      c(139, 218, 247, 134, 38),
      maxColorValue = 255
    ),
    rgb(
      c(197, 233, 253, 230, 161, 77),
      c(27, 163, 224, 245, 215, 146),
      c(125, 201, 239, 208, 106, 33),
      maxColorValue = 255
    ),
    rgb(
      c(197, 233, 253, 247, 230, 161, 77),
      c(27, 163, 224, 247, 245, 215, 146),
      c(125, 201, 239, 247, 208, 106, 33),
      maxColorValue = 255
    ),
    rgb(
      c(197, 222, 241, 253, 230, 184, 127, 77),
      c(27, 119, 182, 224, 245, 225, 188, 146),
      c(125, 174, 218, 239, 208, 134, 65, 33),
      maxColorValue = 255
    ),
    rgb(
      c(197, 222, 241, 253, 247, 230, 184, 127, 77),
      c(27, 119, 182, 224, 247, 245, 225, 188, 146),
      c(125, 174, 218, 239, 247, 208, 134, 65, 33),
      maxColorValue = 255
    ),
    rgb(
      c(142, 197, 222, 241, 253, 230, 184, 127, 77, 39),
      c(1, 27, 119, 182, 224, 245, 225, 188, 146, 100),
      c(82, 125, 174, 218, 239, 208, 134, 65, 33, 25),
      maxColorValue = 255
    ),
    rgb(
      c(142, 197, 222, 241, 253, 247, 230, 184, 127, 77, 39),
      c(1, 27, 119, 182, 224, 247, 245, 225, 188, 146, 100),
      c(82, 125, 174, 218, 239, 247, 208, 134, 65, 33, 25),
      maxColorValue = 255
    )
  ),

  PRGn = list(
    rgb(
      c(175, 247, 127),
      c(141, 247, 191),
      c(195, 247, 123),
      maxColorValue = 255
    ),
    rgb(
      c(123, 194, 166, 0),
      c(50, 165, 219, 136),
      c(148, 207, 160, 55),
      maxColorValue = 255
    ),
    rgb(
      c(123, 194, 247, 166, 0),
      c(50, 165, 247, 219, 136),
      c(148, 207, 247, 160, 55),
      maxColorValue = 255
    ),
    rgb(
      c(118, 175, 231, 217, 127, 27),
      c(42, 141, 212, 240, 191, 120),
      c(131, 195, 232, 211, 123, 55),
      maxColorValue = 255
    ),
    rgb(
      c(118, 175, 231, 247, 217, 127, 27),
      c(42, 141, 212, 247, 240, 191, 120),
      c(131, 195, 232, 247, 211, 123, 55),
      maxColorValue = 255
    ),
    rgb(
      c(118, 153, 194, 231, 217, 166, 90, 27),
      c(42, 112, 165, 212, 240, 219, 174, 120),
      c(131, 171, 207, 232, 211, 160, 97, 55),
      maxColorValue = 255
    ),
    rgb(
      c(118, 153, 194, 231, 247, 217, 166, 90, 27),
      c(42, 112, 165, 212, 247, 240, 219, 174, 120),
      c(131, 171, 207, 232, 247, 211, 160, 97, 55),
      maxColorValue = 255
    ),
    rgb(
      c(64, 118, 153, 194, 231, 217, 166, 90, 27, 0),
      c(0, 42, 112, 165, 212, 240, 219, 174, 120, 68),
      c(75, 131, 171, 207, 232, 211, 160, 97, 55, 27),
      maxColorValue = 255
    ),
    rgb(
      c(64, 118, 153, 194, 231, 247, 217, 166, 90, 27, 0),
      c(0, 42, 112, 165, 212, 247, 240, 219, 174, 120, 68),
      c(75, 131, 171, 207, 232, 247, 211, 160, 97, 55, 27),
      maxColorValue = 255
    )
  ),

  PuBu = list(
    rgb(
      c(236, 166, 43),
      c(231, 189, 140),
      c(242, 219, 190),
      maxColorValue = 255
    ),
    rgb(
      c(241, 189, 116, 5),
      c(238, 201, 169, 112),
      c(246, 225, 207, 176),
      maxColorValue = 255
    ),
    rgb(
      c(241, 189, 116, 43, 4),
      c(238, 201, 169, 140, 90),
      c(246, 225, 207, 190, 141),
      maxColorValue = 255
    ),
    rgb(
      c(241, 208, 166, 116, 43, 4),
      c(238, 209, 189, 169, 140, 90),
      c(246, 230, 219, 207, 190, 141),
      maxColorValue = 255
    ),
    rgb(
      c(241, 208, 166, 116, 54, 5, 3),
      c(238, 209, 189, 169, 144, 112, 78),
      c(246, 230, 219, 207, 192, 176, 123),
      maxColorValue = 255
    ),
    rgb(
      c(255, 236, 208, 166, 116, 54, 5, 3),
      c(247, 231, 209, 189, 169, 144, 112, 78),
      c(251, 242, 230, 219, 207, 192, 176, 123),
      maxColorValue = 255
    ),
    rgb(
      c(255, 236, 208, 166, 116, 54, 5, 4, 2),
      c(247, 231, 209, 189, 169, 144, 112, 90, 56),
      c(251, 242, 230, 219, 207, 192, 176, 141, 88),
      maxColorValue = 255
    )
  ),

  PuBuGn = list(
    rgb(
      c(236, 166, 28),
      c(226, 189, 144),
      c(240, 219, 153),
      maxColorValue = 255
    ),
    rgb(
      c(246, 189, 103, 2),
      c(239, 201, 169, 129),
      c(247, 225, 207, 138),
      maxColorValue = 255
    ),
    rgb(
      c(246, 189, 103, 28, 1),
      c(239, 201, 169, 144, 108),
      c(247, 225, 207, 153, 89),
      maxColorValue = 255
    ),
    rgb(
      c(246, 208, 166, 103, 28, 1),
      c(239, 209, 189, 169, 144, 108),
      c(247, 230, 219, 207, 153, 89),
      maxColorValue = 255
    ),
    rgb(
      c(246, 208, 166, 103, 54, 2, 1),
      c(239, 209, 189, 169, 144, 129, 100),
      c(247, 230, 219, 207, 192, 138, 80),
      maxColorValue = 255
    ),
    rgb(
      c(255, 236, 208, 166, 103, 54, 2, 1),
      c(247, 226, 209, 189, 169, 144, 129, 100),
      c(251, 240, 230, 219, 207, 192, 138, 80),
      maxColorValue = 255
    ),
    rgb(
      c(255, 236, 208, 166, 103, 54, 2, 1, 1),
      c(247, 226, 209, 189, 169, 144, 129, 108, 70),
      c(251, 240, 230, 219, 207, 192, 138, 89, 54),
      maxColorValue = 255
    )
  ),

  PuOr = list(
    rgb(
      c(241, 247, 153),
      c(163, 247, 142),
      c(64, 247, 195),
      maxColorValue = 255
    ),
    rgb(
      c(230, 253, 178, 94),
      c(97, 184, 171, 60),
      c(1, 99, 210, 153),
      maxColorValue = 255
    ),
    rgb(
      c(230, 253, 247, 178, 94),
      c(97, 184, 247, 171, 60),
      c(1, 99, 247, 210, 153),
      maxColorValue = 255
    ),
    rgb(
      c(179, 241, 254, 216, 153, 84),
      c(88, 163, 224, 218, 142, 39),
      c(6, 64, 182, 235, 195, 136),
      maxColorValue = 255
    ),
    rgb(
      c(179, 241, 254, 247, 216, 153, 84),
      c(88, 163, 224, 247, 218, 142, 39),
      c(6, 64, 182, 247, 235, 195, 136),
      maxColorValue = 255
    ),
    rgb(
      c(179, 224, 253, 254, 216, 178, 128, 84),
      c(88, 130, 184, 224, 218, 171, 115, 39),
      c(6, 20, 99, 182, 235, 210, 172, 136),
      maxColorValue = 255
    ),
    rgb(
      c(179, 224, 253, 254, 247, 216, 178, 128, 84),
      c(88, 130, 184, 224, 247, 218, 171, 115, 39),
      c(6, 20, 99, 182, 247, 235, 210, 172, 136),
      maxColorValue = 255
    ),
    rgb(
      c(127, 179, 224, 253, 254, 216, 178, 128, 84, 45),
      c(59, 88, 130, 184, 224, 218, 171, 115, 39, 0),
      c(8, 6, 20, 99, 182, 235, 210, 172, 136, 75),
      maxColorValue = 255
    ),
    rgb(
      c(127, 179, 224, 253, 254, 247, 216, 178, 128, 84, 45),
      c(59, 88, 130, 184, 224, 247, 218, 171, 115, 39, 0),
      c(8, 6, 20, 99, 182, 247, 235, 210, 172, 136, 75),
      maxColorValue = 255
    )
  ),

  PuRd = list(
    rgb(
      c(231, 201, 221),
      c(225, 148, 28),
      c(239, 199, 119),
      maxColorValue = 255
    ),
    rgb(
      c(241, 215, 223, 206),
      c(238, 181, 216, 18),
      c(246, 216, 176, 86),
      maxColorValue = 255
    ),
    rgb(
      c(241, 215, 223, 221, 152),
      c(238, 181, 101, 28, 0),
      c(246, 216, 176, 119, 67),
      maxColorValue = 255
    ),
    rgb(
      c(241, 212, 201, 223, 221, 152),
      c(238, 185, 148, 101, 28, 0),
      c(246, 218, 199, 176, 119, 67),
      maxColorValue = 255
    ),
    rgb(
      c(241, 212, 201, 223, 231, 206, 145),
      c(238, 185, 148, 101, 41, 18, 0),
      c(246, 218, 199, 176, 138, 86, 63),
      maxColorValue = 255
    ),
    rgb(
      c(247, 231, 212, 201, 223, 231, 206, 145),
      c(244, 225, 185, 148, 101, 41, 18, 0),
      c(249, 239, 218, 199, 176, 138, 86, 63),
      maxColorValue = 255
    ),
    rgb(
      c(247, 231, 212, 201, 223, 231, 206, 152, 103),
      c(244, 225, 185, 148, 101, 41, 18, 0, 0),
      c(249, 239, 218, 199, 176, 138, 86, 67, 31),
      maxColorValue = 255
    )
  ),

  Purples = list(
    rgb(
      c(239, 188, 117),
      c(237, 189, 107),
      c(245, 220, 177),
      maxColorValue = 255
    ),
    rgb(
      c(242, 203, 158, 106),
      c(240, 201, 154, 81),
      c(247, 226, 200, 163),
      maxColorValue = 255
    ),
    rgb(
      c(242, 203, 158, 117, 84),
      c(240, 201, 154, 107, 39),
      c(247, 226, 200, 177, 143),
      maxColorValue = 255
    ),
    rgb(
      c(242, 218, 188, 158, 117, 84),
      c(240, 218, 189, 154, 107, 39),
      c(247, 235, 220, 200, 177, 143),
      maxColorValue = 255
    ),
    rgb(
      c(242, 218, 188, 158, 128, 106, 74),
      c(240, 218, 189, 154, 125, 81, 20),
      c(247, 235, 220, 200, 186, 163, 134),
      maxColorValue = 255
    ),
    rgb(
      c(252, 239, 218, 188, 158, 128, 106, 74),
      c(251, 237, 218, 189, 154, 125, 81, 20),
      c(253, 245, 235, 220, 200, 186, 163, 134),
      maxColorValue = 255
    ),
    rgb(
      c(252, 239, 218, 188, 158, 128, 106, 84, 63),
      c(251, 237, 218, 189, 154, 125, 81, 39, 0),
      c(253, 245, 235, 220, 200, 186, 163, 143, 125),
      maxColorValue = 255
    )
  ),

  RdBu = list(
    rgb(
      c(239, 247, 103),
      c(138, 247, 169),
      c(98, 247, 207),
      maxColorValue = 255
    ),
    rgb(
      c(202, 244, 146, 5),
      c(0, 165, 197, 113),
      c(32, 130, 222, 176),
      maxColorValue = 255
    ),
    rgb(
      c(202, 244, 247, 146, 5),
      c(0, 165, 247, 197, 113),
      c(32, 130, 247, 222, 176),
      maxColorValue = 255
    ),
    rgb(
      c(178, 239, 253, 209, 103, 33),
      c(24, 138, 219, 229, 169, 102),
      c(43, 98, 199, 240, 207, 172),
      maxColorValue = 255
    ),
    rgb(
      c(178, 239, 253, 247, 209, 103, 33),
      c(24, 138, 219, 247, 229, 169, 102),
      c(43, 98, 199, 247, 240, 207, 172),
      maxColorValue = 255
    ),
    rgb(
      c(178, 214, 244, 253, 209, 146, 67, 33),
      c(24, 96, 165, 219, 229, 197, 147, 102),
      c(43, 77, 130, 199, 240, 222, 195, 172),
      maxColorValue = 255
    ),
    rgb(
      c(178, 214, 244, 253, 247, 209, 146, 67, 33),
      c(24, 96, 165, 219, 247, 229, 197, 147, 102),
      c(43, 77, 130, 199, 247, 240, 222, 195, 172),
      maxColorValue = 255
    ),
    rgb(
      c(103, 178, 214, 244, 253, 209, 146, 67, 33, 5),
      c(0, 24, 96, 165, 219, 229, 197, 147, 102, 48),
      c(31, 43, 77, 130, 199, 240, 222, 195, 172, 97),
      maxColorValue = 255
    ),
    rgb(
      c(103, 178, 214, 244, 253, 247, 209, 146, 67, 33, 5),
      c(0, 24, 96, 165, 219, 247, 229, 197, 147, 102, 48),
      c(31, 43, 77, 130, 199, 247, 240, 222, 195, 172, 97),
      maxColorValue = 255
    )
  ),

  RdGy = list(
    rgb(
      c(239, 255, 153),
      c(138, 255, 153),
      c(98, 255, 153),
      maxColorValue = 255
    ),
    rgb(
      c(202, 244, 186, 64),
      c(0, 165, 186, 64),
      c(32, 130, 186, 64),
      maxColorValue = 255
    ),
    rgb(
      c(202, 244, 255, 186, 64),
      c(0, 165, 255, 186, 64),
      c(32, 130, 255, 186, 64),
      maxColorValue = 255
    ),
    rgb(
      c(178, 239, 253, 224, 153, 77),
      c(24, 138, 219, 224, 153, 77),
      c(43, 98, 199, 224, 153, 77),
      maxColorValue = 255
    ),
    rgb(
      c(178, 239, 253, 255, 224, 153, 77),
      c(24, 138, 219, 255, 224, 153, 77),
      c(43, 98, 199, 255, 224, 153, 77),
      maxColorValue = 255
    ),
    rgb(
      c(178, 214, 244, 253, 224, 186, 135, 77),
      c(24, 96, 165, 219, 224, 186, 135, 77),
      c(43, 77, 130, 199, 224, 186, 135, 77),
      maxColorValue = 255
    ),
    rgb(
      c(178, 214, 244, 253, 255, 224, 186, 135, 77),
      c(24, 96, 165, 219, 255, 224, 186, 135, 77),
      c(43, 77, 130, 199, 255, 224, 186, 135, 77),
      maxColorValue = 255
    ),
    rgb(
      c(103, 178, 214, 244, 253, 224, 186, 135, 77, 26),
      c(0, 24, 96, 165, 219, 224, 186, 135, 77, 26),
      c(31, 43, 77, 130, 199, 224, 186, 135, 77, 26),
      maxColorValue = 255
    ),
    rgb(
      c(103, 178, 214, 244, 253, 255, 224, 186, 135, 77, 26),
      c(0, 24, 96, 165, 219, 255, 224, 186, 135, 77, 26),
      c(31, 43, 77, 130, 199, 255, 224, 186, 135, 77, 26),
      maxColorValue = 255
    )
  ),

  RdPu = list(
    rgb(
      c(253, 250, 197),
      c(224, 159, 27),
      c(221, 181, 138),
      maxColorValue = 255
    ),
    rgb(
      c(254, 251, 247, 174),
      c(235, 180, 185, 1),
      c(226, 185, 161, 126),
      maxColorValue = 255
    ),
    rgb(
      c(254, 251, 247, 197, 122),
      c(235, 180, 104, 27, 1),
      c(226, 185, 161, 138, 119),
      maxColorValue = 255
    ),
    rgb(
      c(254, 252, 250, 247, 197, 122),
      c(235, 197, 159, 104, 27, 1),
      c(226, 192, 181, 161, 138, 119),
      maxColorValue = 255
    ),
    rgb(
      c(254, 252, 250, 247, 221, 174, 122),
      c(235, 197, 159, 104, 52, 1, 1),
      c(226, 192, 181, 161, 151, 126, 119),
      maxColorValue = 255
    ),
    rgb(
      c(255, 253, 252, 250, 247, 221, 174, 122),
      c(247, 224, 197, 159, 104, 52, 1, 1),
      c(243, 221, 192, 181, 161, 151, 126, 119),
      maxColorValue = 255
    ),
    rgb(
      c(255, 253, 252, 250, 247, 221, 174, 122, 73),
      c(247, 224, 197, 159, 104, 52, 1, 1, 0),
      c(243, 221, 192, 181, 161, 151, 126, 119, 106),
      maxColorValue = 255
    )
  ),

  Reds = list(
    rgb(
      c(254, 252, 222),
      c(224, 146, 45),
      c(210, 114, 38),
      maxColorValue = 255
    ),
    rgb(
      c(254, 252, 251, 203),
      c(229, 174, 106, 24),
      c(217, 145, 74, 29),
      maxColorValue = 255
    ),
    rgb(
      c(254, 252, 251, 222, 165),
      c(229, 174, 106, 45, 15),
      c(217, 145, 74, 38, 21),
      maxColorValue = 255
    ),
    rgb(
      c(254, 252, 252, 251, 222, 165),
      c(229, 187, 146, 106, 45, 15),
      c(217, 161, 114, 74, 38, 21),
      maxColorValue = 255
    ),
    rgb(
      c(254, 252, 252, 251, 239, 203, 153),
      c(229, 187, 146, 106, 59, 24, 0),
      c(217, 161, 114, 74, 44, 29, 13),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 252, 252, 251, 239, 203, 153),
      c(245, 224, 187, 146, 106, 59, 24, 0),
      c(240, 210, 161, 114, 74, 44, 29, 13),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 252, 252, 251, 239, 203, 165, 103),
      c(245, 224, 187, 146, 106, 59, 24, 15, 0),
      c(240, 210, 161, 114, 74, 44, 29, 21, 13),
      maxColorValue = 255
    )
  ),

  RdYlBu = list(
    rgb(
      c(252, 255, 145),
      c(141, 255, 191),
      c(89, 255, 219),
      maxColorValue = 255
    ),
    rgb(
      c(215, 253, 171, 44),
      c(25, 174, 217, 123),
      c(28, 97, 233, 182),
      maxColorValue = 255
    ),
    rgb(
      c(215, 253, 255, 171, 44),
      c(25, 174, 255, 217, 123),
      c(28, 97, 191, 233, 182),
      maxColorValue = 255
    ),
    rgb(
      c(215, 252, 254, 224, 145, 69),
      c(48, 141, 224, 243, 191, 117),
      c(39, 89, 144, 248, 219, 180),
      maxColorValue = 255
    ),
    rgb(
      c(215, 252, 254, 255, 224, 145, 69),
      c(48, 141, 224, 255, 243, 191, 117),
      c(39, 89, 144, 191, 248, 219, 180),
      maxColorValue = 255
    ),
    rgb(
      c(215, 244, 253, 254, 224, 171, 116, 69),
      c(48, 109, 174, 224, 243, 217, 173, 117),
      c(39, 67, 97, 144, 248, 233, 209, 180),
      maxColorValue = 255
    ),
    rgb(
      c(215, 244, 253, 254, 255, 224, 171, 116, 69),
      c(48, 109, 174, 224, 255, 243, 217, 173, 117),
      c(39, 67, 97, 144, 191, 248, 233, 209, 180),
      maxColorValue = 255
    ),
    rgb(
      c(165, 215, 244, 253, 254, 224, 171, 116, 69, 49),
      c(0, 48, 109, 174, 224, 243, 217, 173, 117, 54),
      c(38, 39, 67, 97, 144, 248, 233, 209, 180, 149),
      maxColorValue = 255
    ),
    rgb(
      c(165, 215, 244, 253, 254, 255, 224, 171, 116, 69, 49),
      c(0, 48, 109, 174, 224, 255, 243, 217, 173, 117, 54),
      c(38, 39, 67, 97, 144, 191, 248, 233, 209, 180, 149),
      maxColorValue = 255
    )
  ),

  RdYlGn = list(
    rgb(
      c(252, 255, 145),
      c(141, 255, 207),
      c(89, 255, 96),
      maxColorValue = 255
    ),
    rgb(
      c(215, 253, 166, 26),
      c(25, 174, 217, 150),
      c(28, 97, 106, 65),
      maxColorValue = 255
    ),
    rgb(
      c(215, 253, 255, 166, 26),
      c(25, 174, 255, 217, 150),
      c(28, 97, 191, 106, 65),
      maxColorValue = 255
    ),
    rgb(
      c(215, 252, 254, 217, 145, 26),
      c(48, 141, 224, 239, 207, 152),
      c(39, 89, 139, 139, 96, 80),
      maxColorValue = 255
    ),
    rgb(
      c(215, 252, 254, 255, 217, 145, 26),
      c(48, 141, 224, 255, 239, 207, 152),
      c(39, 89, 139, 191, 139, 96, 80),
      maxColorValue = 255
    ),
    rgb(
      c(215, 244, 253, 254, 217, 166, 102, 26),
      c(48, 109, 174, 224, 239, 217, 189, 152),
      c(39, 67, 97, 139, 139, 106, 99, 80),
      maxColorValue = 255
    ),
    rgb(
      c(215, 244, 253, 254, 255, 217, 166, 102, 26),
      c(48, 109, 174, 224, 255, 239, 217, 189, 152),
      c(39, 67, 97, 139, 191, 139, 106, 99, 80),
      maxColorValue = 255
    ),
    rgb(
      c(165, 215, 244, 253, 254, 217, 166, 102, 26, 0),
      c(0, 48, 109, 174, 224, 239, 217, 189, 152, 104),
      c(38, 39, 67, 97, 139, 139, 106, 99, 80, 55),
      maxColorValue = 255
    ),
    rgb(
      c(165, 215, 244, 253, 254, 255, 217, 166, 102, 26, 0),
      c(0, 48, 109, 174, 224, 255, 239, 217, 189, 152, 104),
      c(38, 39, 67, 97, 139, 191, 139, 106, 99, 80, 55),
      maxColorValue = 255
    )
  ),

  Set1 = list(
    rgb(c(228, 55, 77), c(26, 126, 175), c(28, 184, 74), maxColorValue = 255),
    rgb(
      c(228, 55, 77, 152),
      c(26, 126, 175, 78),
      c(28, 184, 74, 163),
      maxColorValue = 255
    ),
    rgb(
      c(228, 55, 77, 152, 255),
      c(26, 126, 175, 78, 127),
      c(28, 184, 74, 163, 0),
      maxColorValue = 255
    ),
    rgb(
      c(228, 55, 77, 152, 255, 255),
      c(26, 126, 175, 78, 127, 255),
      c(28, 184, 74, 163, 0, 51),
      maxColorValue = 255
    ),
    rgb(
      c(228, 55, 77, 152, 255, 255, 166),
      c(26, 126, 175, 78, 127, 255, 86),
      c(28, 184, 74, 163, 0, 51, 40),
      maxColorValue = 255
    ),
    rgb(
      c(228, 55, 77, 152, 255, 255, 166, 247),
      c(26, 126, 175, 78, 127, 255, 86, 129),
      c(28, 184, 74, 163, 0, 51, 40, 191),
      maxColorValue = 255
    ),
    rgb(
      c(228, 55, 77, 152, 255, 255, 166, 247, 153),
      c(26, 126, 175, 78, 127, 255, 86, 129, 153),
      c(28, 184, 74, 163, 0, 51, 40, 191, 153),
      maxColorValue = 255
    )
  ),

  Set2 = list(
    rgb(
      c(102, 252, 141),
      c(194, 141, 160),
      c(165, 98, 203),
      maxColorValue = 255
    ),
    rgb(
      c(102, 252, 141, 231),
      c(194, 141, 160, 138),
      c(165, 98, 203, 195),
      maxColorValue = 255
    ),
    rgb(
      c(102, 252, 141, 231, 166),
      c(194, 141, 160, 138, 216),
      c(165, 98, 203, 195, 84),
      maxColorValue = 255
    ),
    rgb(
      c(102, 252, 141, 231, 166, 255),
      c(194, 141, 160, 138, 216, 217),
      c(165, 98, 203, 195, 84, 47),
      maxColorValue = 255
    ),
    rgb(
      c(102, 252, 141, 231, 166, 255, 229),
      c(194, 141, 160, 138, 216, 217, 196),
      c(165, 98, 203, 195, 84, 47, 148),
      maxColorValue = 255
    ),
    rgb(
      c(102, 252, 141, 231, 166, 255, 229, 179),
      c(194, 141, 160, 138, 216, 217, 196, 179),
      c(165, 98, 203, 195, 84, 47, 148, 179),
      maxColorValue = 255
    )
  ),

  Set3 = list(
    rgb(
      c(141, 255, 190),
      c(211, 255, 186),
      c(199, 179, 218),
      maxColorValue = 255
    ),
    rgb(
      c(141, 255, 190, 251),
      c(211, 255, 186, 128),
      c(199, 179, 218, 114),
      maxColorValue = 255
    ),
    rgb(
      c(141, 255, 190, 251, 128),
      c(211, 255, 186, 128, 177),
      c(199, 179, 218, 114, 211),
      maxColorValue = 255
    ),
    rgb(
      c(141, 255, 190, 251, 128, 253),
      c(211, 255, 186, 128, 177, 180),
      c(199, 179, 218, 114, 211, 98),
      maxColorValue = 255
    ),
    rgb(
      c(141, 255, 190, 251, 128, 253, 179),
      c(211, 255, 186, 128, 177, 180, 222),
      c(199, 179, 218, 114, 211, 98, 105),
      maxColorValue = 255
    ),
    rgb(
      c(141, 255, 190, 251, 128, 253, 179, 252),
      c(211, 255, 186, 128, 177, 180, 222, 205),
      c(199, 179, 218, 114, 211, 98, 105, 229),
      maxColorValue = 255
    ),
    rgb(
      c(141, 255, 190, 251, 128, 253, 179, 252, 217),
      c(211, 255, 186, 128, 177, 180, 222, 205, 217),
      c(199, 179, 218, 114, 211, 98, 105, 229, 217),
      maxColorValue = 255
    ),
    rgb(
      c(141, 255, 190, 251, 128, 253, 179, 252, 217, 188),
      c(211, 255, 186, 128, 177, 180, 222, 205, 217, 128),
      c(199, 179, 218, 114, 211, 98, 105, 229, 217, 189),
      maxColorValue = 255
    ),
    rgb(
      c(141, 255, 190, 251, 128, 253, 179, 252, 217, 188, 204),
      c(211, 255, 186, 128, 177, 180, 222, 205, 217, 128, 235),
      c(199, 179, 218, 114, 211, 98, 105, 229, 217, 189, 197),
      maxColorValue = 255
    ),
    rgb(
      c(141, 255, 190, 251, 128, 253, 179, 252, 217, 188, 204, 255),
      c(211, 255, 186, 128, 177, 180, 222, 205, 217, 128, 235, 237),
      c(199, 179, 218, 114, 211, 98, 105, 229, 217, 189, 197, 111),
      maxColorValue = 255
    )
  ),

  Spectral = list(
    rgb(
      c(252, 255, 153),
      c(141, 255, 213),
      c(89, 255, 148),
      maxColorValue = 255
    ),
    rgb(
      c(215, 253, 171, 43),
      c(25, 174, 221, 131),
      c(28, 97, 164, 186),
      maxColorValue = 255
    ),
    rgb(
      c(215, 253, 255, 171, 43),
      c(25, 174, 255, 221, 131),
      c(28, 97, 191, 164, 186),
      maxColorValue = 255
    ),
    rgb(
      c(213, 252, 254, 230, 153, 50),
      c(62, 141, 224, 245, 213, 136),
      c(79, 89, 139, 152, 148, 189),
      maxColorValue = 255
    ),
    rgb(
      c(213, 252, 254, 255, 230, 153, 50),
      c(62, 141, 224, 255, 245, 213, 136),
      c(79, 89, 139, 191, 152, 148, 189),
      maxColorValue = 255
    ),
    rgb(
      c(213, 244, 253, 254, 230, 171, 102, 50),
      c(62, 109, 174, 224, 245, 221, 194, 136),
      c(79, 67, 97, 139, 152, 164, 165, 189),
      maxColorValue = 255
    ),
    rgb(
      c(213, 244, 253, 254, 255, 230, 171, 102, 50),
      c(62, 109, 174, 224, 255, 245, 221, 194, 136),
      c(79, 67, 97, 139, 191, 152, 164, 165, 189),
      maxColorValue = 255
    ),
    rgb(
      c(158, 213, 244, 253, 254, 230, 171, 102, 50, 94),
      c(1, 62, 109, 174, 224, 245, 221, 194, 136, 79),
      c(66, 79, 67, 97, 139, 152, 164, 165, 189, 162),
      maxColorValue = 255
    ),
    rgb(
      c(158, 213, 244, 253, 254, 255, 230, 171, 102, 50, 94),
      c(1, 62, 109, 174, 224, 255, 245, 221, 194, 136, 79),
      c(66, 79, 67, 97, 139, 191, 152, 164, 165, 189, 162),
      maxColorValue = 255
    )
  ),

  YlGn = list(
    rgb(
      c(247, 173, 49),
      c(252, 221, 163),
      c(185, 142, 84),
      maxColorValue = 255
    ),
    rgb(
      c(255, 194, 120, 35),
      c(255, 230, 198, 132),
      c(204, 153, 121, 67),
      maxColorValue = 255
    ),
    rgb(
      c(255, 194, 120, 49, 0),
      c(255, 230, 198, 163, 104),
      c(204, 153, 121, 84, 55),
      maxColorValue = 255
    ),
    rgb(
      c(255, 217, 173, 120, 49, 0),
      c(255, 240, 221, 198, 163, 104),
      c(204, 163, 142, 121, 84, 55),
      maxColorValue = 255
    ),
    rgb(
      c(255, 217, 173, 120, 65, 35, 0),
      c(255, 240, 221, 198, 171, 132, 90),
      c(204, 163, 142, 121, 93, 67, 50),
      maxColorValue = 255
    ),
    rgb(
      c(255, 247, 217, 173, 120, 65, 35, 0),
      c(255, 252, 240, 221, 198, 171, 132, 90),
      c(229, 185, 163, 142, 121, 93, 67, 50),
      maxColorValue = 255
    ),
    rgb(
      c(255, 247, 217, 173, 120, 65, 35, 0, 0),
      c(255, 252, 240, 221, 198, 171, 132, 104, 69),
      c(229, 185, 163, 142, 121, 93, 67, 55, 41),
      maxColorValue = 255
    )
  ),

  YlGnBu = list(
    rgb(
      c(237, 127, 44),
      c(248, 205, 127),
      c(177, 187, 184),
      maxColorValue = 255
    ),
    rgb(
      c(255, 161, 65, 34),
      c(255, 218, 182, 94),
      c(204, 180, 196, 168),
      maxColorValue = 255
    ),
    rgb(
      c(255, 161, 65, 44, 37),
      c(255, 218, 182, 127, 52),
      c(204, 180, 196, 184, 148),
      maxColorValue = 255
    ),
    rgb(
      c(255, 199, 127, 65, 44, 37),
      c(255, 233, 205, 182, 127, 52),
      c(204, 180, 187, 196, 184, 148),
      maxColorValue = 255
    ),
    rgb(
      c(255, 199, 127, 65, 29, 34, 12),
      c(255, 233, 205, 182, 145, 94, 44),
      c(204, 180, 187, 196, 192, 168, 132),
      maxColorValue = 255
    ),
    rgb(
      c(255, 237, 199, 127, 65, 29, 34, 12),
      c(255, 248, 233, 205, 182, 145, 94, 44),
      c(217, 177, 180, 187, 196, 192, 168, 132),
      maxColorValue = 255
    ),
    rgb(
      c(255, 237, 199, 127, 65, 29, 34, 37, 8),
      c(255, 248, 233, 205, 182, 145, 94, 52, 29),
      c(217, 177, 180, 187, 196, 192, 168, 148, 88),
      maxColorValue = 255
    )
  ),

  YlOrBr = list(
    rgb(c(255, 254, 217), c(247, 196, 95), c(188, 79, 14), maxColorValue = 255),
    rgb(
      c(255, 254, 254, 204),
      c(255, 217, 153, 76),
      c(212, 142, 41, 2),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 254, 217, 153),
      c(255, 217, 153, 95, 52),
      c(212, 142, 41, 14, 4),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 254, 254, 217, 153),
      c(255, 227, 196, 153, 95, 52),
      c(212, 145, 79, 41, 14, 4),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 254, 254, 236, 204, 140),
      c(255, 227, 196, 153, 112, 76, 45),
      c(212, 145, 79, 41, 20, 2, 4),
      maxColorValue = 255
    ),
    rgb(
      c(255, 255, 254, 254, 254, 236, 204, 140),
      c(255, 247, 227, 196, 153, 112, 76, 45),
      c(229, 188, 145, 79, 41, 20, 2, 4),
      maxColorValue = 255
    ),
    rgb(
      c(255, 255, 254, 254, 254, 236, 204, 153, 102),
      c(255, 247, 227, 196, 153, 112, 76, 52, 37),
      c(229, 188, 145, 79, 41, 20, 2, 4, 6),
      maxColorValue = 255
    )
  ),

  YlOrRd = list(
    rgb(c(255, 254, 240), c(237, 178, 59), c(160, 76, 32), maxColorValue = 255),
    rgb(
      c(255, 254, 253, 227),
      c(255, 204, 141, 26),
      c(178, 92, 60, 28),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 253, 240, 189),
      c(255, 204, 141, 59, 0),
      c(178, 92, 60, 32, 38),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 254, 253, 240, 189),
      c(255, 217, 178, 141, 59, 0),
      c(178, 118, 76, 60, 32, 38),
      maxColorValue = 255
    ),
    rgb(
      c(255, 254, 254, 253, 252, 227, 177),
      c(255, 217, 178, 141, 78, 26, 0),
      c(178, 118, 76, 60, 42, 28, 38),
      maxColorValue = 255
    ),
    rgb(
      c(255, 255, 254, 254, 253, 252, 227, 177),
      c(255, 237, 217, 178, 141, 78, 26, 0),
      c(204, 160, 118, 76, 60, 42, 28, 38),
      maxColorValue = 255
    ),
    rgb(
      c(255, 255, 254, 254, 253, 252, 227, 189, 128),
      c(255, 237, 217, 178, 141, 78, 26, 0, 0),
      c(204, 160, 118, 76, 60, 42, 28, 38, 38),
      maxColorValue = 255
    )
  )
)

# ---------------------------------------------------------------------------
# brewer.pal: look up the pre-computed RGB vectors
# ---------------------------------------------------------------------------
brewer.pal <- function(n, name, direction = 1, alpha = 1, begin = 0, end = 1) {
  is_seq <- name %in% .brewer_seq_schemes

  max_n <- maxcolors[[name]]
  if (n < 3) {
    return(brewer.pal(
      3,
      name,
      direction = direction,
      alpha = alpha,
      begin = begin,
      end = end
    ))
  }
  if (n > max_n) {
    return(brewer.pal(
      max_n,
      name,
      direction = direction,
      alpha = alpha,
      begin = begin,
      end = end
    ))
  }

  cols <- .brewer_data[[name]][[n - 2L]]

  # begin/end: subset the input colours then interpolate back to n
  if (is_seq && (begin != 0 || end != 1)) {
    indices <- round(1 + (length(cols) - 1) * c(begin, end))
    cols <- cols[indices[1]:indices[2]]
    cols <- grDevices::colorRampPalette(cols)(n)
  }

  # direction
  if (direction == -1) {
    cols <- rev(cols)
  }

  # alpha
  cols <- substr(cols, 1, 7)
  cols <- paste0(cols, sprintf("%02X", round(alpha * 255)))

  cols
}

Try the openair package in your browser

Any scripts or data that you put into this service are public.

openair documentation built on May 20, 2026, 5:07 p.m.