On Thu, 21 Dec 2006, Peter Dalgaard wrote:

[...]

> This seems reproducible on  Linux, except that it goes into an infinite
> loop. The lm call seems to be the real culprit:
>
> > testfun <- function(aa=aa) return(aa)
> > testfun()
> Error in testfun() : recursive default argument reference
> > testfun <- function(aa=aa) lm(x~y,data=aa)
> > testfun()
> (*poof*)

The difference is in argument evaluation between closures and internal 
functions (c() in my example, return() in yours).

-- 
Brian D. Ripley,                  [EMAIL PROTECTED]
Professor of Applied Statistics,  http://www.stats.ox.ac.uk/~ripley/
University of Oxford,             Tel:  +44 1865 272861 (self)
1 South Parks Road,                     +44 1865 272866 (PA)
Oxford OX1 3TG, UK                Fax:  +44 1865 272595

______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel

Reply via email to