查找颜色接近colorBrewer调色板的颜色名称

我想使用R包SNA进行社交网络分析。 SNA仅使用R颜色名称（文本名称）为元素着色。查找颜色接近colorBrewer调色板的颜色名称

我想找到附近从调色板在ColorBrewer（SET3）的颜色名称在R.

匹配有RGB空间不是很多精确匹配。

require(RColorBrewer) 
brew10 <- brewer.pal(10, "Set3") 
rcol <- colors() 
brew10rgb <- col2rgb(brew10) 
allrgb <- col2rgb(rcol) 
apply(t(brew10rgb), 1, paste, collapse="$$") %in% apply(t(allrgb), 1, paste,collapse="$$") 
brew10rgb[,1] 
fltr <- allrgb[1,]==141 
allrgb[,fltr] 
fltr <- allrgb[2,]==211 
allrgb[,fltr]

有没有一种方法可以选择好颜色名称为R中一个质的调色板，或将这些RColorBrewer颜色映射到现有的颜色吗？

来源

2013-08-23 Chris

看看这是否有用。（这是对RGB空间的LI的距离）：

col.dist <- function(inp, comp) sum(abs(inp - col2rgb(comp))) 

colors()[ apply(col2rgb(brew10), 2, 
      function(z) which.min(sapply(colors(), 
          function(x) col.dist(inp=z, comp=x)))) ] 
#----------- 
[1] "paleturquoise3" "moccasin"  "lightsteelblue" "salmon" 
[5] "lightskyblue3" "sandybrown"  "darkolivegreen2" "thistle2" 
[9] "gray85"   "orchid3"

看起来似乎已经成功地在寻找：

display.brewer.pal(10,"Set3")

enter image description here （虽然我从来没有看到一个蓟那种颜色，我将有思想数字7更像是一种“浅色”而不是“暗黑色”）。你可能会得到更快的反应，尽管这样做似乎可以接受，如果你一次性调用颜色并存储矩阵。

来源

2013-08-23 18:24:21

+1对于颜色评论 – Gregor

查找颜色接近colorBrewer调色板的颜色名称

回答

相关问题