매달려있는 잎으로 가로로 깔린 그림을 그린다. (R)

Question

나는 수평 레이블을 가진 림프 플롯 플롯을 만들고 싶지만, 플롯 가장자리로 떨어지는 대신에 높이에 따라 잎이 달려있다.

예 :

par(mfrow = c(1,2)) 
hc <- hclust(dist(USArrests), "ave") 
plot(hc) # a plot with hanging branches 
plot(as.dendrogram(hc), horiz = TRUE) # a horizontal plot, but the branches are not hanging 

이가 프로그래밍 할 수있는 방법에 대한 어떤 제안?

감사합니다.

Answer 1

hang의 값을 as.dendrogram 기능에서 변경할 수 있습니다.

기록을 위해

par(mfrow = c(1,2)) 
hc <- hclust(dist(USArrests), "ave") 
plot(hc) 
plot(as.dendrogram(hc, hang=0.02), horiz = TRUE) 

Answer 2

, 나는 또한 후 (그리고뿐만 아니라 dendrogram은에 hclust에서 변화 동안) 만든 dendrogram은 매달려 허용하도록합니다 (dendextend 패키지)를 hang.dendrogram 기능을 구현했습니다. 여기에 그것을 사용하는 방법은 다음과 같습니다?

install.packages("dendextend") 
library(dendextend) 

dend <- as.dendrogram(hclust(dist(USArrests), "ave")) 
par(mar = c(5,5,5,5)) 
plot(hang.dendrogram(dend), horiz = TRUE)