我想做一个分层聚类,然后得到没有同一级别标签的水平图。
我的代码:
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")
基本上,我想要最后一个情节,但是在水平方向上没有标签处于同一水平。
我尝试了这个命令,但标签处于同一级别。
plot(as.dendrogram(myhclust), horiz = TRUE)
答案 0 :(得分:0)
由于您没有提供数据集,我使用了“USArrets”。我相信你会根据下面的代码了解你需要做什么。
data(USArrests)
dd <- dist(scale(USArrests), method = "euclidean")
myhclust <- as.dendrogram(hclust(dd, method = "average"))
plot(myhclust, xlab = "Height", horiz = TRUE)