Re: R-beta: abline

Ted Harding (Ted.Harding@nessie.mcc.ac.uk)
Sat, 19 Jul 1997 01:22:46 +0100 (GMT+0100)


Message-Id: <m0wpNIN-000Fq6C@Tedistan.annex.umist.ac.uk>
From: Ted.Harding@nessie.mcc.ac.uk (Ted Harding)
Subject: Re: R-beta: abline
To: thomas@biostat.washington.edu (Thomas Lumley)
Date: Sat, 19 Jul 1997 01:22:46 +0100 (GMT+0100)
In-Reply-To: <Pine.SUN.3.95.970718170633.4863A-100000@zen> from "Thomas Lumley" at Jul 18, 97 05:08:28 pm

( 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
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=