2013-01-13 27 views
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)会搞砸了? 谢谢!

+0

我困惑你将如何扩展您的矩阵x和y的x, y是1x5的矢量,你会缩放3x3的矩阵吗?当然我想念这里的东西。 – agstudy

+0

它们之间的范围,X(5,25,50)Y(1850,10,990) – user971956

+0

谢谢,实际上在这里找到了我的答案http: //stackoverflow.com/questions/12040240/increasing-row-height-in-r-heatmap-function – user971956

回答

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() 

enter image description here