提取RColorBrewer调色板供其他用途

Question

我正在使用RColorBrewer（palette =“Set2”）。我想提取颜色列表并将它们用于注释。有没有办法提取Set2颜色的矢量（称之为List）并使用它来使注释匹配已使用的颜色（color = List（3））？

谢谢。

Answer 1

你可以像这样提取颜色

library(RColorBrewer)
f <- function(pal) brewer.pal(brewer.pal.info[pal, "maxcolors"], pal)
(cols <- f("Set1"))
# [1] "#E41A1C" "#377EB8" "#4DAF4A" "#984EA3" "#FF7F00" "#FFFF33" "#A65628" "#F781BF" "#999999"