( Re Message From: Thomas Lumley )
> 
> The coef function has no default method, only methods for lm and glm
> objects.  You can add
> 
>  coefficients.default<- function (model) 
> {
>         if (is.null(model$coef)) 
>                 stop("Object has no coefficients")
>         model$coef
> }
> 
> which makes lsfit() work with coef().

Thanks! It works; and I've learned something quite deep about R.
Nice one for the startup file.

Ted.                                    (Ted.Harding@nessie.mcc.ac.uk)
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-help-request@stat.math.ethz.ch
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=

