r - ggdendrogram ：为每个集群添加彩色矩形

Question

我无法在所选集群周围添加彩色矩形。

   library(lattice)
   library(permute)
   library(vegan)
   library("ggplot2")
   library("ggdendro")
   library("dendextend")
   data(dune)
   d <- vegdist(dune)
   csin <- hclust(d, method = "aver")
   ggdendrogram(csin)
   rect.dendrogram(csin, 3, border = 1:3)

我得到了这个答案：“rect.dendrogram(csin, 3, border = 1:3) 中的错误：x 不是树状图对象。” 虽然 csin 是树状图对象。有人有线索吗？

Answer 1

正如我在评论中所写：

1. csin 是 hclust 而不是树状图（使用 as.dendrogram 使其成为树状图）
2. rect.dendrogram 适用于基础 R 图，而不是 ggplot2。

这是使您的 rect.dendrogram 工作的一个简单示例：

library("dendextend")
d <- dist(iris[,-5])
csin <- as.dendrogram(hclust(d, method = "aver"))
plot(csin)
rect.dendrogram(csin, 3, border = 1:3)

输出：