R/method_co_fuzzycluster.R

In cofclust: Consensus Optimization Fuzzy Clustering

#' Method for co_fuzzycluster classes
#'
#' @param x an co_fuzzycluster object
#' @param object an co_fuzzycluster object
#' @export
#' @docType methods
#' @rdname co_fuzzycluster-methods
#' @aliases is.na,co_fuzzycluster-method
setMethod("is.na","co_fuzzycluster",function(x) FALSE)

#' @rdname co_fuzzycluster-methods
#' @aliases show,co_fuzzycluster-method
setMethod("show","co_fuzzycluster",function(object){
  print.co_fuzzycluster(object)
})

#' @rdname co_fuzzycluster-methods
#' @aliases label.ensemble, co_fuzzycluster-method
#' @exportMethod label.ensemble
setGeneric("label.ensemble",function(x){standardGeneric("label.ensemble")})

#' @rdname co_fuzzycluster-methods
#' @aliases label.ensemble,co_fuzzycluster-method
setMethod("label.ensemble","co_fuzzycluster",function(x) x@label.ensemble)

#' @rdname co_fuzzycluster-methods
#' @aliases method.consensus, co_fuzzycluster-method
#' @exportMethod method.consensus
setGeneric("method.consensus",function(x){standardGeneric("method.consensus")})

#' @rdname co_fuzzycluster-methods
#' @aliases method.consensus,co_fuzzycluster-method
setMethod("method.consensus","co_fuzzycluster",function(x) x@method.consensus)


#' @rdname co_fuzzycluster-methods
#' @aliases partition.ensemble, co_fuzzycluster-method
#' @exportMethod partition.ensemble
setGeneric("partition.ensemble",function(x){standardGeneric("partition.ensemble")})

#' @rdname co_fuzzycluster-methods
#' @aliases partition.ensemble,co_fuzzycluster-method
setMethod("partition.ensemble","co_fuzzycluster",function(x) x@partition.ensemble)