Question

我在R中编写了一个函数，如果我可以通过引用传递，就可以按照我的意愿工作。它涉及嵌套sapply调用并在其中执行赋值。由于R不使用传递参考，因此功能不起作用。

我知道有一些可用的软件包如R.oo将引用y方面传递给R，但我想知道是否有更好的方法。什么是＆＃39; R＆＃39;如果无法通过引用传递数据的方式？

Answer 1

如果你不修改一个参数，那么它实际上不会复制它，所以做一些特别的事情可能毫无意义：

> gc() # using 6.2 MB of Vcells
         used (Mb) gc trigger (Mb) max used (Mb)
Ncells 560642 15.0     984024 26.3   984024 26.3
Vcells 809878  6.2    2670432 20.4  2310055 17.7
> x <- as.numeric(1:1000000)
> gc() # now we are using 13.9 MB
          used (Mb) gc trigger (Mb) max used (Mb)
Ncells  560640 15.0     984024 26.3   984024 26.3
Vcells 1809867 13.9    2883953 22.1  2310055 17.7
> f0 <- function(x) { s <- sum(x); print(gc()); s }
> f0(x) # f0 did not use appreciably more despite using a huge vector
          used (Mb) gc trigger (Mb) max used (Mb)
Ncells  560655 15.0     984024 26.3   984024 26.3
Vcells 1809872 13.9    2883953 22.1  2310055 17.7
[1] 500000500000

编辑：对示例进行细微更改

我应该使用什么而不是R中的pass-by-reference？

1 个答案: