Message-ID: <3A822319EB35174CA3714066D590DCD5C4F943@usrymx25.merck.com>
Date: 2003-04-04T22:23:11Z
From: Liaw, Andy
Subject: creating function bodies using body()
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
>
------------------------------------------------------------------------------