On 2/1/10, Research <risk2...@ath.forthnet.gr> wrote:
> do_something_else = function(playstate) ###Export here mean value of
> sequence playState$env$i###
>
Would this do the trick?
playwith(xyplot(dat[,c(1,i)]), parameters = list(i = 1:100,
do_something = function(playState) print(playState$env$i),
do_something_else = function(playState) print(mean(dat[, playState$env$i])),
do_something_diff = function(playState) {
assign("x", mean(dat[, playState$env$i]), envir = .GlobalEnv)
print(x)
}
)
)
Liviu
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
