如何在R中的热图中打印比例

Question

尝试在http://davetang.org/muse/2010/12/06/making-a-heatmap-with-r/

中提到的R中创建热图

data <- read.table("test.txt",sep="\t",header=TRUE,row.names=1)
data_matrix <- data.matrix(data)
install.packages("RColorBrewer")
library("RColorBrewer")
heatmap(data_matrix,Colv=NA,col=brewer.pal(9,"Blues"))

如何获得热图旁边的颜色比例，该比例显示与使用的颜色阴影对应的值范围（对应于浅色的小值和对暗色调的高值），类似于{{3中的第一个热图}}

Answer 1

我只是从the ggplot2 docs site复制/调整以下示例代码：

> library(ggplot2)
> library(reshape2) # for melt
> M=melt(volcano)
> head(M)
  Var1 Var2 value
1    1    1   100
2    2    1   101
3    3    1   102
4    4    1   103
5    5    1   104
6    6    1   105

> ggplot(M, aes(x=Var1, y=Var2, fill=value)) + geom_tile()

geom_tile是重要的一点。你可以通过添加类似的东西来选择自己的颜色。

+ scale_fill_gradient(low="green", high="red")