RStudio绘制无同层级标签的水平层次聚类树状图

我来帮你搞定这个树状图的需求！你想要的水平方向树状图+移除同层级标签（也就是让标签不再全部堆在同一水平线，而是和对应叶节点对齐），只需要调整plot.hclust的几个参数就能实现。

修改后的完整代码 #

dim(bin_mat) # 53194 519 
data = bin_mat[,1:10] 
names(data) = seq(1:10) 
mydist.jacc <- vegdist(t(data), method = "jaccard") 
myhclust <- hclust(mydist.jacc,method='average') 

# 关键修改在这里
plot(myhclust, main = "Genome Clustering", horiz = TRUE, hang = -1)

参数说明 #

• horiz = TRUE：直接把默认的垂直树状图旋转为水平布局，分支从左向右延伸，满足你要的水平方向需求。
• hang = -1：这是解决“同层级标签”问题的核心！默认情况下hang值为0.1，所有标签会集中在树状图的底部（水平图的右侧）同一行；设置为-1后，每个叶节点的标签会直接对齐在该节点的末端，彻底避免标签堆在同一层级的情况。

额外选项 #

如果你想完全隐藏所有叶节点标签，只保留树状图的聚类结构，可以在plot命令里再加labels = NULL参数：

plot(myhclust, main = "Genome Clustering", horiz = TRUE, hang = -1, labels = NULL)

内容的提问来源于stack exchange，提问作者Isabelinho