# NOT RUN {
## Simulate data.
d <- GAMart()
## Estimate model with no results.
b <- bamlss(num ~ s(x1) + s(x2) + s(x3),
data = d, results = FALSE)
## Compute model results
a <- results.bamlss.default(b)
## Plot results for smooth terms.
plot(a)
# }
Run the code above in your browser using DataCamp Workspace