仅将 hclust 绘制到切割的簇，而不是每片叶子
Plotting hclust only to the cut clusters, not every leaf
我有一个包含近 2000 个样本的 hclust 树。我已将其切割成适当数量的簇，并想绘制树状图，但以我切割簇的高度结束，而不是一直到每片叶子。每个绘图指南都是关于按簇给所有叶子上色或画一个盒子，但似乎没有任何东西可以完全留下切割线下方的叶子。
我的完整树状图如下所示：
我想把它画成好像它停在我在这里画 abline 的地方（例如）：
这应该可以帮助您入门。我建议阅读 "dendrogram"
的帮助页面
这是帮助页面中的示例：
hc <- hclust(dist(USArrests))
dend1 <- as.dendrogram(hc)
plot(dend1)
dend2 <- cut(dend1, h = 100)
plot(dend2$upper)
plot(dend2$upper, nodePar = list(pch = c(1,7), col = 2:1))
通过对树状图对象（不是 hclust 对象）执行切割，您可以绘制树状图的上半部分。根据您的分析，替换 branch1、2、3 和 4 标签需要一些工作。
祝你好运。
我有一个包含近 2000 个样本的 hclust 树。我已将其切割成适当数量的簇，并想绘制树状图，但以我切割簇的高度结束，而不是一直到每片叶子。每个绘图指南都是关于按簇给所有叶子上色或画一个盒子，但似乎没有任何东西可以完全留下切割线下方的叶子。
我的完整树状图如下所示：
我想把它画成好像它停在我在这里画 abline 的地方（例如）：
这应该可以帮助您入门。我建议阅读 "dendrogram"
的帮助页面这是帮助页面中的示例：
hc <- hclust(dist(USArrests))
dend1 <- as.dendrogram(hc)
plot(dend1)
dend2 <- cut(dend1, h = 100)
plot(dend2$upper)
plot(dend2$upper, nodePar = list(pch = c(1,7), col = 2:1))
通过对树状图对象（不是 hclust 对象）执行切割，您可以绘制树状图的上半部分。根据您的分析，替换 branch1、2、3 和 4 标签需要一些工作。
祝你好运。