將多個參數傳遞給R中的匿名函數

Question

爲什麼這不起作用？或者只是R的工作方式？

感謝 JJ

a <- c(1,2,3) 
    b <- 5 
    lapply(a, function(x) print(x)) # works 

    lapply(a, function(x,b) print(b)) # doesn't work. 

    I get -- 
    Error in FUN(c(1, 2, 3)[[1L]], ...) : 
     argument "b" is missing, with no default 

Answer 1

你可以嘗試把A和B在列表如下：

lapply(list(a, b), function(x) print(b)) 

或指定argumant傳遞b鍵爲：

lapply(a, function(x, y=b) print(y)) 

但我不確定你在做什麼。

Answer 2

lapply只傳遞一個參數，因爲它只被設計爲有一個參數不同。如果你只是想一起傳遞額外的參數，把它們作爲附加選項lapply：

lapply(a, function(x,y) print(y), y=b) 
[1] 5 
[1] 5 
[1] 5 
[[1]] 
[1] 5 

[[2]] 
[1] 5 

[[3]] 
[1] 5 

從lapply幫助文件：

...可選參數樂趣。

如果您希望將多個不同的參數傳遞給您的函數，請參閱mapply。