[Rd] naresid.exclude query

2011-01-14 Thread Simon Wood
ether I should just code up a work-around for predict.gam? Simon -- > Simon Wood, Mathematical Sciences, University of Bath, Bath, BA2 7AY UK > +44 1225 386603 www.maths.bath.ac.uk/~sw283 __ R-devel@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-devel

Re: [Rd] get_all_vars fails with matrices (PR#13624)

2009-03-26 Thread Simon Wood
> > get_all_vars(~z+X,dat) > > z X.1 X.2 X.3 > 1 26 1 6 11 > 2 27 2 7 12 > 3 28 3 8 13 > 4 29 4 9 14 > 5 30 5 10 15 > > > dat <- data.frame(list(X=I(matrix(1:15,5,3)),z=26:30)) > > get_all_vars(~z+X,dat) > >

[Rd] glm(...,quasi(link="logit")) problem?

2007-07-25 Thread Simon Wood
e first fit iteration only, of course. Is it worth fixing? I found this after someone reported a problem with mgcv::gamm (which calls MASS:glmmPQL which calls glm), which is why I'm not just supplying my own mustart and getting on with it... best, Simon >- Simon Wood, Mat

Re: [Rd] gaussian family change suggestion

2006-04-11 Thread Simon Wood
;> > >>> A possible replacement would be ... > >>> > >>> initialize = expression({ > >>>n <- rep.int(1, nobs) > >>>if (is.null(etastart) && is.null(start) && is.null(mustart) &&

Re: [Rd] gaussian family change suggestion

2006-04-11 Thread Simon Wood
"inverse" && all(y == 0)) || > > (family$link == "log" && all(y <= 0 stop( > > "cannot find valid starting values: please specify some") > >mustart <- y > > if (family$link==&

[Rd] gaussian family change suggestion

2006-04-11 Thread Simon Wood
(y <= 0 stop( "cannot find valid starting values: please specify some") mustart <- y if (family$link=="log") { iy <- y<=0 if (sum(iy)) mustart[iy] <- min(y[!iy])*.5 } else if (family$link=="inverse"