r - 如何使用斜体创建树状图

Question

所以我试图根据距离矩阵创建一个包含 42 个不同基因的树状图。该图是使用以下内容创建的：

d6 = dist(t(cildata))

hc6 = hclust(d6)

情节（HC6）

然后，我将该图保存为 jpeg。

不过，我需要保存一个基因名称斜体的情节版本，但我不知道如何去做。我已经看到与如何将主要情节标题更改为斜体有关的类似问题，但不是情节内的标签。

非常感谢任何和所有帮助。

谢谢，马库斯 G。

Answer 1

hc <- hclust(dist(USArrests), "ave")
italicLeafs <- c("Iowa", "New Hampshire") # select: italic leafs

den <- dendrapply(as.dendrogram(hc), FUN=function(n) {
  if(is.leaf(n)) 
    if (attr(n, "label") %in% italicLeafs) 
      attr(n, "label") <- as.expression(substitute(italic(leaf), list(leaf=attr(n, "label"))))
  n
})

plot(den)