遍歷列表以通過其名稱獲取價值

Question

這可行。 但是，是否有更有效/更簡單的方法來獲取output ？

test_list <- list(list("name"="A","property"=1),
              list("name"="B","property"=2),
              list("name"="C","property"=3))

myFunction <- function(arg1=NULL, arg2=NULL){
  arg1[[arg2]]
}

# works
output <- sapply(test_list, myFunction, "property")

# returns NULL 
# output <- sapply(test_list, `$`, "property")

Answer 1

我們可以指定匿名函數調用來進行提取

sapply(test_list, function(x) x$property)
#[1] 1 2 3