## 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 DataLab