用於熱圖的額外標籤

我想將矢量「值」顯示爲熱圖標籤。有人知道如何去做？這裏是我的表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

用於熱圖的額外標籤

回答

相關問題