R/extract.r

In hadley/clusterfly: Explore clustering interactively using R and GGobi

Defines functions clusters clusters.kmeans clusters.default clusters.partition

Documented in clusters

#' Extract clusters from clustering object.
#'
#' @param x object
#' @export
#' @keywords internal
clusters <- function(x) UseMethod("clusters", x)
#' @export
clusters.kmeans <- function(x) as.vector(x$cluster)
#' @export
clusters.default <- function(x) as.vector(x)
#' @export
clusters.partition <- function(x) x$clustering