On 1/26/2006 9:45 PM, Manuel Morales wrote:
> Dear list members,
>
> I'm looking for a way to write "nested" functions similar to the
> function "Nest" or "NestList" in Mathematica.
>
> E.g.,
>
> f<-function(x) x+2*x
>
> f(f(f(2)))
>
> might instead be written as nest(f, 2, 3)
>
> read as, nest function f 3 times with 2 as the initial value.
It's easy enough using a for loop:
nest <- function(f, initial, reps) {
result <- initial
for (i in seq(len=reps)) result <- f(result)
result
}
Duncan Murdoch
______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
