On Fri, 8 Oct 2004, Khamenia, Valery wrote:
Hi all,
Situation:
there is a function `f' already defined by someone and
provided in package. `f' looks like that:
f <- function() {
x+1
}
i.e. `f' is not closed i.r.t. term `x'
now I have my own function `g', where I'd like
to override variable `x'
Khamenia, Valery biovision-discovery.de> writes:
:
: Hi all,
:
: Situation:
:
: there is a function `f' already defined by someone and
: provided in package. `f' looks like that:
:
: f <- function() {
: x+1
: }
:
: i.e. `f' is not closed i.r.t. term `x'
:
: now I have my own f
Not an direct answer to your question, but why not do something like:
> f <- function() x + 1
> x <- 10
> f()
[1] 11
> g <- function(x, ...) {
+ my.f <- f
+ formals(my.f) <- c(list(x=NULL), formals(f))
+ my.f(x, ...)
+ }
> g(5)
[1] 6
Andy
> From: Khamenia, Valery
>
> Hi all,
>
> Si