CopulaDTA (version 0.0.1)

printcopula: Print a summary of the fitted model.

Description

Print a summary of the fitted model.

Usage

printcopula(object, digits = 3, ...)

Value

The posterior mean and 95 percent credible intervals, n_eff, Rhat and WAIC.

References

{Watanabe S (2010). Asymptotic Equivalence of Bayes Cross Validation and Widely Applicable Information Criterion in Singular Learning Theory. Journal of Machine Learning Research, 11, 3571-3594.} {Vehtari A, Gelman A (2014). WAIC and Cross-validation in Stan. Unpublished, pp. 1-14.}

Examples

data(telomerase)
fit <- fitcopula(data=telomerase,
SID = "ID",
copula="fgm",
iter = 400,
warmup = 100,
seed=1,
cores=1)

printcopula(object=fit)

print(fit$model, pars=c('p_i'), digits=4, prob=c(0.025, 0.975))