用于热图的额外标签

我想将矢量“值”显示为热图标签。有人知道如何去做？这里是我的表1用于热图的额外标签

#   drug-1 drug-2 drug-3 drug-4 
# assay-1 7.045337 0.000000 0.000000  0 
# assay-2 4.693248 4.430464 0.000000  0 
# assay-3 4.505905 0.000000  NA  0 
# assay-4 4.777868 4.765742  NA  0 
# assay-5 5.549705 4.950920 4.546701  0 

my_palette <- colorRampPalette(c("red", "yellow", "green"))(n = 299) 
col_breaks = c(seq(-1,2,length=100), seq(2.1,4,length=100), seq(4.1,10,length=100)) 

heatmap.2(table1, main = " heading",notecol="black",density.info="none", trace="none", margins =c(16,20),col=my_palette,breaks=col_breaks, dendrogram="row",Colv="NA")

这给了我

我希望有第三拉布勒

values <- c(3.1,4.2,5.0,6.4)

所以我的形象应该像

来源

2017-03-01 mr_swap

尝试heatmap.2加入以下参数

add.expr=text(x=seq_along(col_breaks), y=5, labels=values, pos=4)

我不能重现你的榜样，从而位置x和y可能需要调整。

来源

2017-03-01 19:29:41 tatxif

我收到错误“object”col.breaks'not found“。我已经使用了以下库dplyr，dtplyr，tidyr，ggplot2，gplots，RColorBrewer –

这是我的拼写错误，是的，它确实显示值byt我需要一些调整。我会为此努力。谢谢 –

很高兴我帮了忙！请接受这个答案，谢谢！ – tatxif

用于热图的额外标签

回答

相关问题