R：覆蓋父命名空間中的一個變量

Question

函數setMeZero如何查看以便可以執行以下操作？

a = 1 
b = 2 
setMeZero(a) 
setMeZero(b) 
a == 0 
# TRUE 
b == 0 
# TRUE 

編輯：我真的打算就這樣，無論是好方式或不是另一個問題。

Answer 1

你可以做這樣的事情

setMeZero <- function(x){ 
    nm <- deparse(substitute(x)) 
    assign(nm, 0, parent.frame()) 
    invisible() 
} 
a <- 1 
b <- 2 
setMeZero(a) 
setMeZero(b) 
a == 0 
# TRUE 
b == 0 
# TRUE