如何將新成員添加到R中的函數列表中

Question

我想添加一個新成員到列表中。當我這樣做時如下。但是，當我想要做一個函數，沒有什麼變化..

> a = list(x=4, y=2) 
> a 
$x 
[1] 4 

$y 
[1] 2 

> a$c = 7 
> a 
$x 
[1] 4 

$y 
[1] 2 

$c 
[1] 7 

使用功能...

> addNew(a) 
> a 
$x 
[1] 4 

$y 
[1] 2 

功能是：

addNew = function(list){ 
    list$c = 7 
} 

也許是有點兒像c中的指針問題，但如何解決它？

Answer 1

您必須返回並分配修改列表：

a <- list(x=4, y=2) 
addNew <- function(l) { 
    l$c <- 7 
    return(l) 
} 
a <- addNew(a) 

編輯：由於@mitra提到的，你可以使用<<-：

a <- list(x=4, y=2) 
addNew <- function() { 
    a$c <<- 7 
} 

但是，改變R A功能的典型行爲大多數用戶並不認爲某個功能會帶來像改變全球環境的副作用。

請仔細閱讀帕特里克·伯恩斯R Inferno（第35頁）：

如果你認爲你需要< < - ，再想一想。如果反思，你仍然認爲你 需要< < - ，再想一想。只有當你的老闆因爲對你的憤怒而變得紅潤 你應該暫時屈服於誘惑而不做任何事情。有 已提議（不超過半開玩笑），以消除< < - 從 語言。這不會消除全球任務，只會迫使您使用分配功能來實現它們。

Answer 2

你應該看看局部和全局變量之間的差別：

Global and local variables in R

如果你定義一個函數內部的變量，它是暫時的，只屬於功能。

檢查：

list$c<<-7