R/hclust.wrap.R

hclust.wrap <-
function(x,centers) {
   hc <- hclust(dist(x))

   res=cutree(hc, k = centers) #k = 1 is trivial
   return(res)
}

Try the SODC package in your browser

Any scripts or data that you put into this service are public.

SODC documentation built on May 2, 2019, 3:35 p.m.