1

我正在使用以下代码生成热图(在 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) 会搞砸吗?谢谢!

4

1 回答 1

0

我想这可能会对你有所帮助。以下方法对我有用(尽管我只知道如何使用该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()

在此处输入图像描述

于 2013-01-13T09:58:30.093 回答