collap(data, level, d = "cosangle", dmat = NULL, newmed = "medsil")
cutdigits(labels, dig)
cutzeros(labels)
digits(label)
msscollap(data, level, khigh, d = "cosangle", dmat = NULL,
newmed = "medsil", within = "med", between = "med", impr = 0)
msscomplete(level, data, K = 16, khigh = 9, d = "cosangle",
dmat = NULL, within = "med", between = "med", verbose=FALSE)
mssinitlevel(data, kmax = 9, khigh = 9, d = "cosangle",
dmat = NULL, within = "med", between = "med", ord = "co", verbose=FALSE)
mssmulticollap(data, level, khigh, d = "cosangle", dmat = NULL,
newmed = "medsil", within = "med", between = "med", impr = 0)
mssnextlevel(data, prevlevel, dmat, kmax = 9, khigh = 9,
within = "med", between = "med")
mssrundown(data, K = 16, kmax = 9, khigh = 9, d = "cosangle",
dmat = NULL, initord = "co", coll = "seq", newmed = "medsil",
stop = TRUE, finish = FALSE, within = "med", between = "med",
impr = 0, verbose = FALSE)
msssplitcluster(clust1, l1, id1, medoid1, med2dist, right, dist1,
kmax = 9, khigh = 9, within = "med", between = "med")
newnextlevel(data, prevlevel, dmat, klow = 2, khigh = 6)
newsplitcluster(clust1, l1, id1, klow = 2, khigh = 2, medoid1,
med2dist, right, dist1)
nonzeros(labels)
orderelements(level, data, rel = "own", d = "cosangle", dmat = NULL)
paircoll(i, j, data, level, d = "cosangle", dmat = NULL,
newmed = "medsil")
d
. If a matrix is provided, the user is responsible for ensuring that the metric used agrees with d
.labels
.labels
.within
.impr
, then the collapse is not performed.impr
.finish=FALSE
and stop=FALSE
, level K
is returned.clust1
.clust1
.clust1
.clust1
and the neighboring cluster's medoid. This is the next medoid to the right, unless clust1
is the last cluster (right=FALSE
), in which case it is the next medoid to the left.clust1
.collap
, msscollap
, paircoll
, mssmulticollap
, mssinitlevel
, msscomplete
, mssnextlevel
, mssrundown
, newnextlevel
.The following functions return the components for a new level of the tree corresponding to splitting a single cluster: msssplitcluster
and newsplitcluster
. These are called by mssnextlevel
and newnextlevel
, respectively.The function orderelements
returns a list with two components: (i) the ordered data and (ii) the vector of indices for ordering (as returned by order
).The function cutdigits
returns truncated labels.The function cutzeros
returns labels with trailing zeros removed.The function digits
returns an integer denoting the number of digits in label
.The function nonzeros
returns a vector denoting the number of digits in labels
after removing trailing zeros.van der Laan, M.J. and Pollard, K.S. A new algorithm for hybrid hierarchical clustering with visualization and the bootstrap. Journal of Statistical Planning and Inference, 2003, 117, pp. 275-303.
http://www.stat.berkeley.edu/~laan/Research/Research_subpages/Papers/hopach.pdf
http://www.bepress.com/ucbbiostat/paper107/
http://www.stat.berkeley.edu/~laan/Research/Research_subpages/Papers/jsmpaper.pdf
Kaufman, L. and Rousseeuw, P.J. (1990). Finding Groups in Data: An Introduction to Cluster Analysis. Wiley, New York.
hopach
#These are not user level functions
#See: hopach examples
#? hopach
Run the code above in your browser using DataLab