用列表作為輸入套用在列表上

Question

我有一個清單：

thing_list <- list("thing1","thing2","thing3")

而一個函數需要一件事，並產生結果

function(thing){
    do operations with the thing
    return(result)
}

我想將該函數應用於列表中的每個元素。 並將結果存儲在其他列表中。

這是我有疑問的地方：

restul_list <- lapply(things_list, function(**HOW TO REFERENCE THE CURRENT THING AS ARGUMENT**))

我如何傳遞lapply時列表中的每個元素作為函數的參數。

謝謝

Answer 1

如果要get存儲在對象中的值（ data.frame或vector或matrix等），請使用mget返回對象值的list ，然后使用lapply循環

 thing_list <-  c("thing1","thing2","thing3")
 lapply(mget(thing_list), yourfun)

Answer 2

做就是了

lapply(thing_list, f)

其中f是您的函數。

Answer 3

result_list <- lapply(things_list, function(x) thing(x))