GAMart.RdThis function creates artificial GAM-type data.frames.
The function is mainly used for testing purposes.
GAMart(n = 500, sd = 0.1, seed = FALSE,
ti = c("none", "vcm", "main", "both"))The number of observations.
Standard deviation of the normal errors.
Sets the seed to 111.
For tensor product interaction term, the type of interaction.
d <- GAMart()
head(d)
#> num pnum bnum cnum bin cat cens eta
#> 1 0.22448771 2.183610 0.59194775 59 yes high 0.0000000 0.22288422
#> 2 -0.04070049 1.918422 0.46156222 46 yes medium 0.0000000 -0.17194222
#> 3 0.09393145 2.053054 0.52775694 53 yes medium 0.0000000 -0.09285494
#> 4 -0.25124768 1.707875 0.35804212 36 no low 0.2853643 -0.23426955
#> 5 -0.80988218 1.149241 0.08337734 7 no none 0.9940416 -0.60198239
#> 6 0.69002031 2.649143 0.82083696 83 yes high 1.1853554 0.65343018
#> x1 x2 x3 fac id lon lat err
#> 1 0.04403888 0.03549120 0.4019293 medium 1 0.95454545 0.4090909 0.001603486
#> 2 0.96212875 0.95895070 0.4689313 high 2 0.90909091 0.3636364 0.131241729
#> 3 0.81144865 0.51639646 0.1403924 high 3 0.86363636 0.7272727 0.186786395
#> 4 0.43695375 0.50308477 0.1364540 low 4 0.00000000 0.7727273 -0.016978129
#> 5 0.49433428 0.82186219 0.5042405 low 5 0.09090909 0.4545455 -0.207899789
#> 6 0.46025451 0.06364112 0.9103734 medium 6 0.86363636 0.4090909 0.036590132
if (FALSE) b <- bamlss(num ~ s(x1) + s(x2) + s(x3) + te(lon,lat), data = d)
plot(b)
#> Error in h(simpleError(msg, call)): error in evaluating the argument 'x' in selecting a method for function 'plot': object 'b' not found