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，rect.dendrogram= 1:3)：X不是树状图对象。”尽管csin是树状图对象。有谁有线索吗？

Answer 1

正如我在评论中所写的：

1. csin是dendrogram)
2. rect.dendrogram，而不是树状图(使用as.dendrogram使其成为ggplot2)适用于基本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)

输出：

​

​