Hey guys,

I have a doubt here , It is something simple I guess, what am I missing out
here ??


f <- function(y) function() y
tmp <- vector("list", 5)
for (i in 1:5) tmp[[i]] <- f(i)
tmp[[1]]() # returns 5;

z <- f(6)
tmp[[1]]() # still returns 5; it should return 6 "ideally" right ???

Even if  I dont evaluate the function tmp[[1]] before i.e I do
rm(list=ls())
f <- function(y) function() y
tmp <- vector("list", 5)
for (i in 1:5) tmp[[i]] <- f(i)
 z <- f(6)
tmp[[1]]() # it still returns 5; it should return 6 "ideally" right ???

	[[alternative HTML version deleted]]

