Message-ID: <43A571E5.48.4E761E@localhost>
Date: 2005-12-18T13:27:49Z
From: Dr. Herwig Meschke
Subject: dendrogram branches with different lty
In-Reply-To: <1134751202.43a2ede2297d0@webmail.unibas.ch>
On 16 Dec 2005 at 17:40, Patrick Kuss wrote:
>
> Dear r-list,
>
> I am trying to visually seperate the two main clusters of a dendrogram.
> The idea is to use:
>
> 'edgePar=list(lty=3)' for 'dend1[[1]]' and
> 'edgePar=list(lty=1)' for 'dend1[[2]]'
>
> I have not found a way to solve this. Any suggestions?
>
> Patrick
>
> hc <- hclust(dist(USArrests), "ave")
> (dend1 <- as.dendrogram(hc))
> par(mfrow=c(2,2))
> plot(dend1)
> plot(dend1[[1]],edgePar=list(lty=3))
> plot(dend1[[2]],edgePar=list(lty=1))
try
dend1[[1]] <- dendrapply(dend1[[1]], function(e) { attr(e, "edgePar") <- list(lty=3); e })
plot(dend1)
Regards,
Herwig
--
Dr. Herwig Meschke
Wissenschaftliche Beratung
Hagsbucher Weg 27
D-89150 Laichingen
phone +49 7333 210 417 / fax +49 7333 210 418
email HerwigMeschke at t-online.de