R/2.2.checkFittingTypeRequirements.R

In Mmcsd: Modeling Complex Longitudinal Data in a Quick and Easy Way

checkFittingTypeRequirements <- function(fittingType) {
  if (!fittingType %in% c("PML", "ULSC", "GLSC2", "GLSC3", "GLSC4")) {
    stop("Invalid 'fittingType' argument. 'fittingType' must be 'PML', 'ULSC', 'GLSC2', 'GLSC3' or 'GLSC4'")
  }

  return(NULL)
}