Generic function returning the deviance information criterion (DIC) of a fitted model object.
Arguments
- object
A fitted model object for which there exists a DIC method.
- ...
Optionally more fitted model objects.
Examples
if (FALSE) d <- GAMart()
b1 <- bamlss(num ~ s(x1), data = d)
#> Error in eval(expr, envir, enclos): object 'd' not found
b2 <- bamlss(num ~ s(x1) + s(x2), data = d)
#> Error in eval(expr, envir, enclos): object 'd' not found
DIC(b1, b2)
#> Error in eval(expr, envir, enclos): object 'b1' not found