Heatmap.2：在左/上添加行/列标签，无需硬编码坐标

Question

我正在尝试使用heatmap.2重新创建一个热图，类似于这个（1） ：

我可以在底栏和右栏标签上添加“ACGT”标签。 我正在尝试将“组”名称添加到顶部和左侧轴（“1012T3”等和“G> A”等）。

我已经尝试通过add.expr函数执行此add.expr ，但这add.expr文本覆盖在热图上方，并在我尝试将其移动到热图的左侧时消失。

我已经能够通过硬编码这样的坐标来添加它（2） ：

pos1 <- structure(list(x = c(0.222, 0.861), 
                   y = 0.993),
              .Names = c("x", "y"))

text(x=seq(pos1$x[1], pos1$x[2], len=6), y=rep(pos1$y[1],6)  ,
 srt=0, xpd=TRUE, adj = 0,
 labels=c('C>A', 'C>G', 'C>T', 'T>A', 'T>C', 'T>G') )

虽然它有效，但我不太满意于必须对坐标进行硬编码的一些hacky解决方案。 有没有人有解决方案在左/上添加行/列标签而不对坐标进行硬编码？

谢谢！

Answer 1

我发现的“ñapa”是使用参数offsetRow。

即：heatmap.2（dataframe，offsetRow = -36）。 带负数的offsetRow将标签向左移动。