[R相当于Matlab的“老大难”

Question

说我有一个matlab功能：

function y = myfunc(x) 
    persistent a 
    a = x*10 
    ... 

什么是R等价声明为persistent a声明？ <<-或assign()？

Answer 1

这里有一种方法：

f <- local({ x<-NULL; function(y) { 
    if (is.null(x)) { # or perhaps !missing(y) 
     x <<- y+1 
    } 

    x 
}}) 

f(3) # First time, x gets assigned 
#[1] 4 
f() # Second time, old value is used 
#[1] 4 

会发生什么事是，local创建x<-NULL围绕一个新的环境和功能的声明。因此，在函数内部，它可以使用x变量并使用<<-分配给它。

您可以找到环境这样的功能：

e <- environment(f) 
ls(e) # "x"