[R] creating function bodies using body()

[Liaw, Andy]

This apparently worked:

> body(f) <- expression({x^2; x+3})
> f
function (x) 
{
    x^2
    x + 3
}

HTH,
Andy

> -----Original Message-----
> From: Setzer.Woodrow at epamail.epa.gov
> [mailto:Setzer.Woodrow at epamail.epa.gov]
> Sent: Friday, April 04, 2003 5:06 PM
> To: r-help at stat.math.ethz.ch
> Subject: [R] creating function bodies using body()
> 
> 
> I'm having trouble figuring out how to create a function 
> using "body<-"
> ().  The help file for body() says that the argument should 
> be a list of
> R expressions.  However if I try that I get an error:
> 
> > tmpfun <- function(a, b=2){}
> > body(tmpfun) <- list(expression(z <- a + b),expression(z^2))
> Error in as.function.default(c(formals(f), value), envir) :
>         invalid formal argument list for "function"
> 
> Can someone give me a simple example for doing this?  Thanks!
> 
> R. Woodrow Setzer, Jr.                        Phone: (919) 541-0128
> Experimental Toxicology Division             Fax:  (919) 541-4284
> Pharmacokinetics Branch
> NHEERL B143-05; US EPA; RTP, NC 27711
> 
> ______________________________________________
> R-help at stat.math.ethz.ch mailing list
> https://www.stat.math.ethz.ch/mailman/listinfo/r-help
> 


------------------------------------------------------------------------------