在函數中創建變量常量R

Question

有沒有什麼辦法可以在R中定義一個函數，其中的常數是由變量確定的？我不知道如何說更好，所以這裏是一個例子。

> index<-3 
> f<-function(x){x+index} 
> f(4) 
[1] 7  #Great! 
> index<-20 
> f(4) 
[1] 24 #No! I still want to see 7! 

謝謝！

Answer 1

一個可能的解決方案是另一個函數中定義的函數：

g <- function(index){ 
    function(x) x + index 
} 
index <- 3 
f <- g(index) 
f(4) 
index<-20 
f(4) 

現在的g(index)的輸出是中定義的函數（執行）環境g。此功能（f）將在此環境中查看index的值，它固定爲3.這就是它工作的原因，但也許有一個更簡單的解決方案。

Answer 2

查找?lockBinding，你的答案是here

index <- 3 
lockBinding("index", globalenv()) 
index <- 4 
#> Error: cannot change value of locked binding for 'index'