R 在热图中使行标签倾斜。2

我正在尝试使用R函数

heatmap.2

使我的行标签倾斜。没有默认选项，例如，我无法通过设置

par（font=3）

找到解决方法。如何在热图2中将行标签设置为斜体

set.seed(123)
data = matrix(sample(100), nrow=10, ncol=10)
rownames(data) = c("A", "B", "C", "D", "E", "F", "G", "H", "I", "J")

library(gplots)

heatmap.2(data,
           Colv=TRUE,
           Rowv=TRUE,
           xlab=NA,
           ylab=NA)

---

您可以使用

labCol

和

labRow

参数来传递标签。我们只需要弄清楚如何将它们作为

plotmath

表达式列表传入。我总是觉得这很痛苦，因为我没有经常这样做来记住适当的咒语，但我能够通过调整将代码组合在一起。注意，矩阵需要有列名，我在下面的代码中添加了列名

library(gplots)

# Fake data
set.seed(123)
data = matrix(sample(100), nrow=10, ncol=10)
rownames(data) = c("A", "B", "C", "D", "E", "F", "G", "H", "I", "J")
colnames(data) = 1:ncol(data)

heatmap.2(data,
          Colv=TRUE,
          Rowv=TRUE,
          labCol=as.expression(lapply(colnames(data), function(a) bquote(italic(.(a))))),
          labRow=as.expression(lapply(rownames(data), function(a) bquote(italic(.(a))))),
          xlab=NA,
          ylab=NA)

---

表达式（italic（））

在这里工作。只需找出一种方法，将其潜入

热图.2

函数。不幸的是，这只会导致一行标记为：italic（“B”）。关于如何将其潜入热图2的任何建议？运行

heatmap2

，不带任何参数。源代码将自动生成。您需要更改

轴（…）

函数。