我想创建一个带有水平标签的树状图,但要让叶子根据其高度悬挂,而不是仅仅掉到图的边缘。

例:

par(mfrow = c(1,2))
hc <- hclust(dist(USArrests), "ave")
plot(hc) # a plot with hanging branches
plot(as.dendrogram(hc), horiz = TRUE) # a horizontal plot, but the branches are not hanging




关于如何编程的任何建议?

谢谢。

最佳答案

您可以在hang函数中更改as.dendrogram的值。

par(mfrow = c(1,2))
hc <- hclust(dist(USArrests), "ave")
plot(hc)
plot(as.dendrogram(hc, hang=0.02), horiz = TRUE)

09-07 22:17