如何生成块大小不均匀的热图？

Question

我使用以下代码生成热图（从AvgByQ向量中）：

library(gplots)
x<-c(0, 5, 30, 80)
y<-c(150, 2000, 2010, 3000)
AvgByQ<-c(20.25, 13.02,  0.00,  0.00,  0.00,  0.00,  8.31, 14.66,  0.00)
AvgByQMatrix <- matrix(AvgByQ, ncol=3, byrow=TRUE)
heatmap.2(AvgByQMatrix, cellnote=AvgByQMatrix, notecol="black",col=redblue(256),key=TRUE, dendrogram = "none", trace="none")

如何更改块大小以匹配/缩放到X和Y矢量值？ 此外，与缩放问题有些相关，任何想法为什么行顺序（1,3,2）搞砸了？ 谢谢！

Answer 1

我认为这可能会对你有所帮助。以下方法对我有用（虽然我只知道如何使用image()函数执行此操作：

#using image() function
x<-c(0, 5, 30, 80, 1000)
y<-c(150, 2000, 2010, 3000)
grd <- expand.grid(x=x, y=y)
z<-matrix(grd$x*2-grd$y*3, nrow=length(x), ncol=length(y), byrow=TRUE)
image(x=x, y=y, z=z, col=rainbow(20))

#another option with z-scale
source("image.scale.r") #http://menugget.blogspot.de/2011/08/adding-scale-to-image-plot.html
x11(width=5, height=4)
layout(matrix(1:2, nrow=1, ncol=2), widths=c(4,1), heights=4, respect=TRUE)
layout.show(2)
par(mar=c(4,4,1,1))
image(x=x, y=y, z=z, col=rainbow(20))
par(mar=c(4,0,1,4))
image.scale(z, col=rainbow(20), horiz=FALSE, xlab="", ylab="", xaxt="n", yaxt="n")
axis(4)
box()