我正在使用 heatmap.2 来获取三角形热图(矩阵的上部被删除)。
我使用了这段代码:
my_data_t <- t( as.matrix(my_data) )
`cor.matrix <- cor( my_data_t, method = "spearman")`
`cor.matrix[upper.tri( cor.matrix )] <- NA`
`my.col <- c( "blue", "green", "yellow", "orange", "red" )`
`my.breaks <- c( 0, 0.2, 0.6, 0.8, 1 )`
`hm2 <- heatmap.2( cor.matrix, scale="none", Rowv=NA, Colv=NA,
col=my.col, breaks=my.breaks, margins(5,5),
cexRow=0.5,cexCol=1.0,key=TRUE,keysize=1.5,
trace="none")`
my_data 是这样的:
my_data <- "Taxon NO8.4 NO6.1 NO7.3 NO9.4 N09.7
a 0.1 0.05 0.01 0.2 0.06
b 0.0 0.8 0.8 0.0 0.0
c 0.7 0.0 0.0 0.0 0.1
d 0.0 0.01 0.08 0.0 0.09
e 0.0 0.0 0.0 0.0 0.0
f 0.09 0.05 0.01 0.04 0.0
g 0.07 0.7 0.0 0.01 0.08"
现在我想在热图的右边有颜色键,我想让它更大(作为热图右边的一个栏,只要这个)。功能上可以吗heatmap.2
??
我也尝试使用该legend()
命令,但在我看来它只能生成框图例,每种颜色都有一个框,所以没有唯一的侧栏,对吗?