# NOT RUN {
## Generate some data.
d <- GAMart()
## Estimate model without sampling statistics
b <- bamlss(num ~ s(x1) + s(x2) + s(x3) + te(lon,lat),
data = d, samplestats = FALSE)
## Note: needs the $d() or $loglik() function in the family!
names(family(b))
## Compute sampling statistics.
samplestats(b)
# }
Run the code above in your browser using DataLab