在 R USArrests 数据集中切割树状图不会返回正确的树状图

Question

我一直在网上找教程，但结果不正确

d <- dist(USArrests, method = "euclidean") # distance matrix
usarrests_hi_cluster <- hclust(d, method="complete") 

plot(usarrests_hi_cluster)

这很好用，我得到了整个树状图

但是当我执行以下操作以在特定高度修剪时

my_dend<-cutree(usarrests_hi_cluster, h = 150)

print(my_dend)

只获取带有数字的州列表

       Alabama         Alaska        Arizona       Arkansas 
             1              1              1              2 
    California       Colorado    Connecticut       Delaware 
             1              2              3              1 
       Florida        Georgia         Hawaii          Idaho 
             1              2              3              3 
      Illinois        Indiana           Iowa         Kansas 
             1              3              3              3 
      Kentucky      Louisiana          Maine       Maryland 
             3              1              3              1

我想在某个高度切割树状图以获得 3 个簇和 plot 它

我试图回答这个问题

(b) 在产生三个不同簇的高度处切割树状图。 哪些州属于哪些集群？

Answer 1

请参阅此问题/答案以获得相同的问题，但绘制树的顶部： 仅将 hclust 绘制到切割的簇，而不是每个叶子

您正在寻找的是绘制较低的分支。 分支级别作为列表存储在数据结构的“$lower”变量中。

hc <- hclust(dist(USArrests))
#cut tree
dend2 <- cut(dend1, h = 150)
#cycle through the lower list and plot
lapply(dend2$lower, function(x){plot(x)})

回答 (b) 部分： print(my_dend)的 output 显示每个 state 属于哪个分支。