Generic function returning the deviance information criterion (DIC) of a fitted model object.

DIC(object, ...)

Arguments

object

A fitted model object for which there exists a DIC method.

Optionally more fitted model objects.

Examples

# NOT RUN {
d <- GAMart()
b1 <- bamlss(num ~ s(x1), data = d)
b2 <- bamlss(num ~ s(x1) + s(x2), data = d)
DIC(b1, b2)
# }