[R] Weird function call problem

[Duncan Murdoch]

Bela Bauer wrote:

>Hi,
>
>I'm encountering a very odd problem with calls to anova.mlm() from within a
>function.
>
>Consider the following code (data.n is a matrix of numeric values):
>
>mlmfit <- lm(data.n ~ 1)
>mlmfit0 <- lm(data.n ~ 0)
>print(mlmfit)
>anova(mlmfit,mlmfit0,test="Spherical")
>
>If I run it just like this from the console, it works just fine. If,
>however, I call it from within a function, e.g. using
>
>fct <- function(data.k) {
> # same code with data.n replaced by data.k
>}
>fct(data.n)
>
>It gives me
>  
>
>>fct(data.n)
>>    
>>
>
>Call:
>lm(formula = data.k ~ 1)
>
>Coefficients:
>...
>
>Error in anova.mlmlist(object = mlmfit, mlmfit0, test = "Spherical") :
>        Object "mlmfit" not found
>
>What causes mlmfit to "disappear" between two lines? I haven't got the
>slightest clue where to look for an answer...
>
>Thank you very much for your help.
>  
>

This looks like a bug in the anova.mlm or anova.mlmlist functions.  One 
of them is looking in the wrong place for mlmfit.

Duncan Murdoch