Check fitted model
check_model(fit = NULL, data = NULL)
A fitted model, as obtained from fit_model()
.
Data list (from prepare_data()
).
Model checks on console and graphical window.
if (FALSE) { # interactive()
data(web)
dt <- prepare_data(mat = web, sampl.eff = rep(20, nrow(web)))
fit <- fit_model(dt, refresh = 0)
check_model(fit, data = data)
}