我知道一些R包,比如randomcolorR
和pals
可以生成多个明显不同的颜色,但是我不知道它们是否适合色盲人?
有没有更好的方法可以获得约30种既明显不同又适合色盲的颜色?或者有没有表格/网站可以搜索适合色盲的颜色?这样我就可以手动选择。
提前致谢。
我知道一些R包,比如randomcolorR
和pals
可以生成多个明显不同的颜色,但是我不知道它们是否适合色盲人?
有没有更好的方法可以获得约30种既明显不同又适合色盲的颜色?或者有没有表格/网站可以搜索适合色盲的颜色?这样我就可以手动选择。
提前致谢。
此外,建议最多使用8种不同的颜色。
无论如何:
这里有两个类似的8种色盲友好颜色的调色板
# The palette with grey:
cbPalette <- c("#999999", "#E69F00", "#56B4E9", "#009E73", "#F0E442", "#0072B2", "#D55E00", "#CC79A7")
# The palette with black:
cbbPalette <- c("#000000", "#E69F00", "#56B4E9", "#009E73", "#F0E442", "#0072B2", "#D55E00", "#CC79A7")
以下是15种适合色盲人的配色方案:此处
pal <- c("#000000","#004949","#009292","#ff6db6","#ffb6db",
"#490092","#006ddb","#b66dff","#6db6ff","#b6dbff",
"#920000","#924900","#db6d00","#24ff24","#ffff6d")
我认为你可以使用 RColorBrewer
来完成这个任务。它似乎有27种色盲友好的颜色。
library(RColorBrewer)
n <- 30
colrs <- brewer.pal.info[brewer.pal.info$colorblind == TRUE, ]
col_vec = unlist(mapply(brewer.pal, colrs$maxcolors, rownames(colrs)))
col <- sample(col_vec, n)
area <- rep(1,n)
pie(area, col = col)
颜色:
[1] "#E5F5F9" "#1D91C0" "#67001F" "#F7FCFD" "#CB181D" "#78C679" "#F46D43" "#A6CEE3" "#FD8D3C" "#A6D854"
[11] "#D4B9DA" "#6A51A3" "#7F0000" "#D9D9D9" "#FFF7BC" "#000000" "#F0F0F0" "#C7EAE5" "#003C30" "#F16913"
[21] "#FFF7FB" "#8C6BB1" "#C7E9B4" "#762A83" "#FC9272" "#AE017E" "#F7F7F7" "#DF65B0" "#EF3B2C" "#74C476"