我在R中有一维数据向量,我想找到与此数据对应的热图颜色。例如:
data = c(12,32,33,41,5)
然后我想找到一个与该矢量对应的HEX颜色矢量 - 更高的值有更深的颜色,更低的值有更浅的颜色或类似的东西。
是否有任何包/功能可以做到这一点?
谢谢!
答案 0 :(得分:6)
通过一些谷歌搜索,我在this link上找到了以下功能:
val2col<-function(z, zlim, col = heat.colors(12), breaks){
if(!missing(breaks)){
if(length(breaks) != (length(col)+1)){stop("must have one more break than colour")}
}
if(missing(breaks) & !missing(zlim)){
breaks <- seq(zlim[1], zlim[2], length.out=(length(col)+1))
}
if(missing(breaks) & missing(zlim)){
zlim <- range(z, na.rm=TRUE)
zlim[2] <- zlim[2]+c(zlim[2]-zlim[1])*(1E-3)#adds a bit to the range in both directions
zlim[1] <- zlim[1]-c(zlim[2]-zlim[1])*(1E-3)
breaks <- seq(zlim[1], zlim[2], length.out=(length(col)+1))
}
colorlevels <- col[((as.vector(z)-breaks[1])/(range(breaks)[2]-range(breaks)[1]))*(length(breaks)-1)+1] # assign colors to heights for each point
colorlevels
}
这似乎正是您所寻找的。 p>