Deviance Information Criterion
Generic function returning the deviance information criteriom of a fitted model object.
DIC(object, ...) ## S3 method for class 'bayesx' DIC(object, ...)
object |
an object of class |
... |
specify for which model the criterion should be returned, e.g. type |
Nikolaus Umlauf, Thomas Kneib, Stefan Lang, Achim Zeileis.
## Not run: ## generate some data set.seed(121) n <- 200 ## regressors dat <- data.frame(x = runif(n, -3, 3)) ## generate response dat$y <- with(dat, 1.5 + sin(x) + rnorm(n, sd = 0.6)) ## estimate model b <- bayesx(y ~ sx(x), data = dat, method = "MCMC") ## extract DIC DIC(b) ## End(Not run)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.