목록의 값 사용

Question

3 개의 벡터가 포함 된 목록이 있습니다.

mylist <- list(a = c(1,2), 
       b = c(3,4), 
       c = c(5,6)) 

, 예를 들면, sum() 기능을 갖는 세 개의 오브젝트의 처음 값에 대한 계산을 수행 할 수있는 간단한 방법이 있는가?

내가 좋아하는 많은 것들을 시도 :

sum(mylist[c(a, b, c)][1]) 

작동하지 않는 코드 행,하지만 내가 뭘하려고 오전에 대한 통찰력을 제공합니다.

도움 주셔서 감사합니다.

Answer 1

사용 sapply

> sum(sapply(mylist, "[", 1)) 
[1] 9 

보너스 재미있는 사실 : 당신은 [[ ]]의 내부 c()를 사용할 수 있습니다

sum(sapply(seq(mylist), function(i) mylist[[ c(i, 1) ]])) 

Answer 2

하지 매우 효율적인 솔루션 :

sum(unlist(lapply(mylist,'[',1))) 
[1] 9