我正在使用hexbin图来制作散点图矩阵,以显示某些区域的密度。
示例:
library(lattice)
library(hexbin)
splom(cbind(rnorm(10000),rnorm(10000),rnorm(100),rnorm(100)),
,varnames = c("A","B","C","D")
,panel = panel.hexbinplot
,lower.panel = function(x, y, ...) {
panel.fill(col = brewer.pal(9, "Greys")[ round(cor(x, y,method = "spearman") * 4 + 2)])
cpl <- current.panel.limits()
panel.text(mean(cpl$xlim), mean(cpl$ylim), round(cor(x, y,method = "spearman"),2), font=2)
}
,upper.panel = function(x, y, ...){
panel.hexbinplot(x, y, type = "r", xbins = 10, ...)
}
,pscale=0, varname.cex=1, xlab = ""
)
在我看来,在6个六边形图中的每一个中重新计算了色标,即哪个计数适用于哪种颜色。它在这里没有区别,但它在我的数据中有所作为。如何将所有这些设置为一个刻度,这意味着无论图中的最大计数是25还是150,具有25个计数的六边形在所有6个图中都具有相同的颜色。
提前多多感谢。
答案 0 :(得分:1)
也许为时已晚,但是如果其他人有相同的问题...尝试使用参数 maxcnt ,它对我来说可以使用Opeanair软件包。我生成了4个图,每个图都有相同的色带:具有相同计数的六边形具有相同的颜色。