Rでポインタ的何か

RのlistにめちゃくちゃでかいvectorやmatrixをつっこんでいくとRが落ちることがある。「ポインタ的何かをつっこめれば、、、」と思うこともあるけど、Rにポインタはない。

と思っていたが、相当することができそうな気がしてきた。こんな感じ。

> x <- 1:1000
> y <- 1:1000
> (l <- list(as.symbol("x"), as.symbol("y")))
[[1]]
x

[[2]]
y

> 
> lapply(l, function(tmp){
+   eval(call("mean", tmp))
+ })
[[1]]
[1] 500.5

[[2]]
[1] 500.5