R/ml_mcmc_summary_print_descriptives.R

Defines functions ml_mcmc_summary_print_descriptives

## File Name: ml_mcmc_summary_print_descriptives.R
## File Version: 0.04

ml_mcmc_summary_print_descriptives <- function(object)
{
    cat("Outcome model:", object$outcome, "\n")
    cat("Number of observations", "=", object$N, "\n")
    ncluster_list <- object$ncluster_list
    NCL <- length(ncluster_list)
    for (cc in seq_len(NCL)){
        cat( paste0("Number of clusters (", names(ncluster_list)[cc],")"), "=",
                        ncluster_list[[cc]], "\n")
    }
    cat("\n")
}

Try the miceadds package in your browser

Any scripts or data that you put into this service are public.

miceadds documentation built on May 29, 2024, 11:05 a.m.