热图的额外标签

Question

我想将矢量“值”显示为热图标签。有人知道怎么做吗？ 这是我的桌子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)

所以我的图像应该看起来像

Answer 1

尝试在 heatmap.2 中添加以下参数

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

我无法重现您的示例，因此位置 x 和 y 可能需要调整。