search for: grsq

...+ 9.331949 * pmax(0, x - 94) ## - 8.48575 * pmax(0, x - 96.5) ## Selected 12 of 12 terms, and 1 of 1 predictors ## Termination condition: Reached nk 21 ## Importance: x ## Number of terms at each degree of interaction: 1 11 (additive model) ## GCV 108.6592 RSS 82109.44 GRSq 0.861423 RSq 0.86894 fm2 <- earth(x, y, fast.k = 0) # (more extensive forward pass) summary(fm2) all.equal(fm1, fm2)# they are identical (apart from 'call'): fm3 <- earth(x, y, fast.k = 0, pmethod = "none", trace = 3) # extensive forward pass; *no* pruning ## still no c...

...94) > ## - 8.48575 * pmax(0, x - 96.5) > > ## Selected 12 of 12 terms, and 1 of 1 predictors > ## Termination condition: Reached nk 21 > ## Importance: x > ## Number of terms at each degree of interaction: 1 11 (additive model) > ## GCV 108.6592 RSS 82109.44 GRSq 0.861423 RSq 0.86894 > > > fm2 <- earth(x, y, fast.k = 0) # (more extensive forward pass) > summary(fm2) > all.equal(fm1, fm2)# they are identical (apart from 'call'): > fm3 <- earth(x, y, fast.k = 0, pmethod = "none", trace = 3) # extensive forward pa...

...Volume ~ ., data = trees) Expression: 23 + 5.7 * pmax(0, Girth - 13) - 2.9 * pmax(0, 13 - Girth) + 0.72 * pmax(0, Height - 76) Number of cases: 31 Selected 4 of 5 terms, and 2 of 2 predictors Number of terms at each degree of interaction: 1 3 (additive model) GCV: 11 RSS: 213 GRSq: 0.96 RSq: 0.97 Regards, Stephen Milborrow _______________________________________________ R-packages mailing list R-packages at stat.math.ethz.ch https://stat.ethz.ch/mailman/listinfo/r-packages

...Volume ~ ., data = trees) Expression: 23 + 5.7 * pmax(0, Girth - 13) - 2.9 * pmax(0, 13 - Girth) + 0.72 * pmax(0, Height - 76) Number of cases: 31 Selected 4 of 5 terms, and 2 of 2 predictors Number of terms at each degree of interaction: 1 3 (additive model) GCV: 11 RSS: 213 GRSq: 0.96 RSq: 0.97 Regards, Stephen Milborrow _______________________________________________ R-packages mailing list R-packages at stat.math.ethz.ch https://stat.ethz.ch/mailman/listinfo/r-packages

...doy-89) 0.0471836 h(89-doy) -0.1264530 h(doy-159) -0.0915781 Selected 14 of 19 terms, and 8 of 9 predictors Importance: temp, ibh, doy, dpg, humidity, vh, vis, wind, ibt-unused Number of terms at each degree of interaction: 1 13 (additive model) GCV 14.85938 RSS 4134.014 GRSq 0.769177 RSq 0.8042181 [[alternative HTML version deleted]]

...doy-89) 0.0471836 h(89-doy) -0.1264530 h(doy-159) -0.0915781 Selected 14 of 19 terms, and 8 of 9 predictors Importance: temp, ibh, doy, dpg, humidity, vh, vis, wind, ibt-unused Number of terms at each degree of interaction: 1 13 (additive model) GCV 14.85938 RSS 4134.014 GRSq 0.769177 RSq 0.8042181 [[alternative HTML version deleted]]

How can I do automatic knot selection while fitting piecewise linear splines to two variables x and y? Which package to use to do it simply? I also want to visualize the splines (and the scatter plot) with a graph. Anupam [[alternative HTML version deleted]]

Hi, I'm trying to use mars function in R to interpolate nonlinear multivariate functions. However, it seems that mars gives me a fit which uses only very few basis function and it underfits very badly. For example, I have tried the following code to test mars: require("mda") f <- function(x,y) { x^2-y^2 }; #f <- function(x,y) { x+2*y }; # Grid x <-

...UB4bEnF4ODkoYQhD++r8$7*HWuQDNYf=z!7z!Qxxrd}-JNK<LuFIK zYs<3$Qo>9K56_nI2nn<HO|Du#Q}u*m5%L|_kfsu8UR*qNJ6$&a)!H3z;H8L!xJhME zSo-XXrIH0z5%kJm%R!YSEU5UClcaTu%Mt-LSt49ve~?*9nO#~t1(&Rud4LybOw~+O zr71^wwgQ{6498BgscY}0w3-3#BvjP^ZIfO}fZ6e;r>!{JS0`LeZ_PIQ6&AVfxuu!4 zRctoZE%o7Iltv9E{~grSq*kD^7=_bhjSxgrI(FhH#3m^UQAzY?*lX6&5G`vR2x6 at z zT`01d5n85f3fP~(x&@RXEz)1zSEZB{^huac+IxLq!X92eKRkMJ&-N7e`hsj|!QQiM znuwO<Zh%0;C|x;VNmpUtEF$b%Ssgz+wJ<e1RhlYKot}Ec)NNDqQ;Sopd3&gXkOXNM z3BkAoizbo=uoJD`Q7$jy5;1$i8&-m&c%Q|4p6!n~ClGEB>nTg?aWWJDN9b+NZjv0l zOWWD0(&AYGuNR...