分配值相关的色彩梯度以禁止在R基本情节

Question

给定一组值：

x<-sort(100*round(runif(10, 0.0, 1.0), digits=2)) 

（）调色板可以用于颜色分配给一个柱状图的每个条的一个函数的彩虹的条的总数：

barplot(x,col=rainbow(length(x))) 

有一个简单的解决方案，从彩虹色调色板由每个条表示的值的函数分配的颜色，从而使克罗ser值会有更多相似的颜色？

Answer 1

例如，你可以做

set.seed(1) 
x <- sort(100*round(runif(10, 0.0, 1.0), digits=2)) 

palFun <- colorRampPalette(rainbow(length(x))) 
barplot(x,col=palFun(diff(range(x))+1)[x-min(x)+1], names.arg = x)