# \donttest{
# Fit an AME model
data(YX_nrm)
fit <- ame(YX_nrm$Y, Xdyad = YX_nrm$X, R = 2, gof = TRUE,
nscan = 100, burn = 10, odens = 1, verbose = FALSE)
# Quick diagnostic plot (shows trace plots)
plot(fit)
# }
Run the code above in your browser using DataLab