代码之家 › 专栏 › 技术社区 › Adela

树状图中的聚类标签

dendrogram r

2

Adela · 技术社区 · 9 年前

hc = hclust(dist(mtcars))
plot(hc, hang = -1)
rect.hclust(hc, k = 3, border = "red")

所需输出应如下所示:

谢谢你的建议!

2 回复 | 直到 9 年前

1

4

Cath 9 年前

您需要获得放置集群标签的位置坐标:

第一轴:
rect.hclust ,您也可以指定结果,以便使用它查找簇的开始(第一个簇从1开始,第二个簇从1+第一个簇的长度开始,等等)。

rh <- rect.hclust(hc, k = 3, border = "red")
beg_clus <- head(cumsum(c(1, lengths(rh))), -1)

第二轴:

y_clus <- weighted.mean(rev(hc$height)[2:3], c(4, 1))

text(x=beg_clus, y=y_clus, col="red", labels=LETTERS[1:3], font=2)

2

3

timfaber 9 年前

rect.hclust.labels(hc, k=3, border = 1 ) # adds labels to clusters

推荐文章

Cecilia · 用树状图可视化层次聚类中的最低节点

9 年前

Gabi Steinberg · 如何在树状图中,在r中选择低于某个截止值的所有簇

9 年前

jk22 · 基于k的R图上部树状图

10 年前

jake9115 · 如何使R输出有关树状图对象的文本详细信息?

11 年前