R/aaa_classes.R

In graphpcor: Models for Correlation Matrices Based on Graphs

#' Set a tree whose nodes represent the two kind of variables:
#' children and parent.
setClass("treepcor")

#' Set a graph whose nodes and edges represent variables and
#' conditional distributions, respectively.
setClass("graphpcor")

#' `inla.rgeneric` class, short `rgeneric`,
#' to define a [INLA::rgeneric()] latent model
#' @rdname rgeneric
setClass(
  "inla.rgeneric",
  slots = "f",
  validity = function(object) {
    all(c("model", "n", "rgeneric") %in%
          names(object$f))
  }
)

#' `inla.cgeneric` class, short `cgeneric`,
#' to define a [INLA::cgeneric()] latent model
#' @rdname cgeneric
setClass(
  "inla.cgeneric",
  slots = "f",
  validity = function(object) {
    all(c("model", "n", "cgeneric") %in%
          names(object$f))
  }
)