r - 注释树状图节点上的距离

Question

考虑一个简单的树状图

dend <- 1:5 %>% dist %>% hclust %>% as.dendrogram

如何在节点上标注距离(高度)？我查找了 dendextend 包，但它没有提供这样的功能。但是，我知道我可以列出这些距离

heights <- as.list(dend %>% get_nodes_attr("height"))

非常感谢任何帮助。

Answer 1

这是一个使用 pvclust 包中的 hc2axes 的简单示例:

# install.packages("pvclust") # install package if needed
plot(hc <- hclust(dist( mtcars[1:10, ])))
with(pvclust:::hc2axes(hc), 
     text(x.axis, y.axis, round(y.axis, 2), adj = c(.5, 1))
)