Displaying 1 result from an estimated 1 matches for "mydend".
Did you mean:
midend
2009 Jun 19
1
Drawing dendrogram
...g codes). Is there a way that I can include my labels into as well? Any help is deeply appreciated.
Kind Regards
Seyit Ali
Codes:
set.seed(201)
x<-matrix(rnorm(100, 0, 1), ncol=20, byrow=TRUE)
myclust<- hclust(dist(cor(x), method='euclidian'), method="ave")
mydend<-as.dendrogram(myclust)
par(mfrow=c(1,2), mar=c(5,4,4,3), oma=c(1, 3, 1, 3))
plot(mydend, xlim=c(4, -0.2), horiz = TRUE, main="My Dendrogram 1")
x0<- -0.35
y0<- 0.5
x1<- 1.8
y1<- 0.5
segments(x0, y0, x1, y1, col="red", lty=2)
x0<- -0.35
y0<- 4.4
x1<-...