在R中使用dendextend修改树状图

Question

我正在尝试使用dendextend修改和调整集群树状图，使用以下代码：

# prepare hierarchical cluster
hc = hclust(dist(mtcars))

dend <- as.dendrogram(hc)

dend %>% set("branches_lty", 3) %>% plot()

请问如何为特定的K集群设置branches_lty？

另外，我想修改并对齐离开文本到给定的长度和缩进，如图所示。

我附上了一个例子图片来看，我不能用dendextend包来实现它。

注意：

我可以使用A2Rplot绘制它，但我不能修改它。两者都可以使用吗？

# load code of A2R function
source("http://addictedtor.free.fr/packages/A2R/lastVersion/R/code.R")
# colored dendrogram
op = par(bg = "#EFEFEF")
A2Rplot(hc, k = 3, boxes = FALSE, col.up = "gray50", col.down = c("#FF6B6B", "#4ECDC4", "#556270"))

​

​

Answer 1

您可以使用set("branches_k_lty", k= 3)来解决此问题，例如：

library(dendextend)
hc = hclust(dist(mtcars))
dend <- as.dendrogram(hc)
dend %>% set("branches_k_lty", k= 3) %>% plot()

​

​