我知道如何在 K-means 聚类中找到每个聚类的中心。但是对于层次聚类,我不确定如何在 R 中做到这一点。这是我的代码:首先,我使用 DTW 距离制作了距离矩阵,并将其输入到 R 中:
DTW<-read.csv(file.choose(), head=T, row.names=1)
DTWS2N <- as.dist(as(DTW, "matrix"))
然后,我做了层次聚类(K=10):
hc <- hclust(DTWS2N)
plot(hc)
groups <- cutree(hc, k=10)
rect.hclust(hc, k=10, border="red")
我还可以通过以下方式查看每个集群中的元素:
d = data.frame(Cluster_ID = cutree(hc,k=10))
现在,我想查看每个集群中的“中心”(集群内与其他人距离最小的那个),我找不到 R 代码,有人可以帮我吗?非常感谢!