R/models_classes.R

In comeetie/greed: Clustering and Model Selection with the Integrated Classification Likelihood

#' @title Abstract class to represent a generative model for clustering
#'
#' @description An S4 class to represent an abstract generative model
#' @slot alpha a numeric vector of length 1 which define the parameters of the Dirichlet over the cluster proportions (default to 1)
#' @family DlvmModels
#' @export
setClass("DlvmPrior", slots = list(alpha = "numeric"))


#' @title Abstract class to represent a generative model for co-clustering
#'
#' @description An S4 class to represent an abstract generative model
#' @slot alpha a numeric vector of length 1 which define the parameters of the Dirichlet over the cluster proportions (default to 1)
#' @family DlvmCoModels
#' @export
setClass("DlvmCoPrior", contains = "DlvmPrior")