From heydebre@molgen.mpg.de  Wed Aug 22 19:29:29 2001
From: heydebre@molgen.mpg.de (heydebre@molgen.mpg.de)
Date: Wed, 22 Aug 2001 20:29:29 +0200 (MET DST)
Subject: [Rd] cutree (PR#1067)
Message-ID: <200108221829.UAA08571@pubhealth.ku.dk>

Full_Name: Anja von Heydebreck
Version: 1.3.0
OS: Alpha Unix
Submission from: (NULL) (141.14.19.61)


Hi,

I repeatedly obtained meaningless results from the function 'cutree' 
in the 'mva' package, when the argument 'h' was greater or equal to 
the maximum height occuring: 

> library('mva')
> y
     [,1] [,2] [,3] [,4]
[1,]    0    1   -1    1
[2,]    0   -1    1    0
[3,]    0   -1    1    1
[4,]   -1   -2    1    0
> d <- dist(y, method="manhattan")
> hc <- hclust(d, method = "complete")
> hc$height
[1] 1 3 7
> cluster <- cutree(hc, h=max(hc$height))
> cluster
[1] 1108612352          1 1074517880          1

Best regards,

Anja


-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._


[Rd] cutree (PR#1067)
heydebre@molgen.mpg.de