如何在R中通过引用传递参数？

Question

我想将矩阵传递给函数并将其修改保存在函数中，如何通过C ++或java等引用传递它？

Answer 1

请参阅：

?ReferenceClasses

以下是一个可能引起很多混淆的黑客行为：

f <- function(x, ...) {
    name <- deparse(substitute(x))
    x <- x + 1
    assign(name, x, envir=parent.frame())
    return(invisible())
}

Answer 2

您可以使用eval.parent和substitute。

> my_fun <- function(x, value){
+     eval.parent(substitute(x<-value))
+ }

> k = 1
> my_fun(k, 100)
> k
[1] 100