Well, the na.action component (which may or may not be present in an lm
object) is *not* what na.action is documented to give:
Value:
The action which will be applied to 'object' whenever 'NA's are
not desired.
So this needs some re-working, and it is not just "lm" objects that have
I'm not sure if this is the official behavior but I would expect the
na.action function applied to a lm object to return the na.action.
Here is what I mean.
> x<-0:10
> y<-x+rnorm(10)
Warning message:
In x + rnorm(10) :
longer object length is not a multiple of shorter object length
> y[5]<-NA
>