如何在R中为我生成的热图添加箭头?

时间:2014-12-10 06:42:12

标签: r heatmap

我知道如何创建热图,但我想在特定行上的我感兴趣的基因旁边添加一个箭头。我看到一些有箭头的热图,但我无法找到解决方案。 这是我使用heatmap.3的热图代码:

heatmap.3(as.matrix(exprs(df)),keysize = 1, Colv=T,Rowv=F,main = "My heatmap", 
 ColSideColors=Col.matrix,side.height.fraction=0.5,col=my.colors, 
  dendrogram="column", scale="none",  breaks=my.breaks, key=TRUE)

以下是如何使用heatmap.3包绘制热图的示例。

  ## load library
  require("GMD")
  require(cluster)
  ## load data
  data(ruspini)
  ## heatmap on a `dist' object
  x <- gdist(ruspini)
  main <- "Heatmap of Ruspini data"
  dev.new(width=10,height=10)
  heatmap.3(x, main=main) # with a title and a map in square!

以下是另一个热图的链接,可视化我要查找的内容:(在热图旁边添加一个箭头)如果查看热图,您可以在热图的y轴旁边找到两个箭头。 它来自这篇文章: Veillonella,Firmicutes:微生物伪装成革兰氏阴性菌,doi:10.4056 / sigs.2981345

http://standardsingenomics.org/index.php/sigen/article/viewFile/298/1064/9070

提前致谢,

1 个答案:

答案 0 :(得分:0)

似乎这个答案的变体应该有效:https://stackoverflow.com/a/3427956/2615477。尝试使用xpd = T的箭头():

arrows(x0, y0, x1, y1, xpd=T)