2013-10-24 5 views
1

동물원 요소 목록이 있습니다. 그리고 목록은 다음과 같습니다목록에있는 요소를 R에 추가하십시오

> str(a) 
List of 4 
    $ :‘zoo’ series from 2013-08-08 to 2013-09-09 
    Data: num [1:33] 0 0 0 0 5.62 ... 
    Index: POSIXct[1:33], format: "2013-08-08" "2013-08-09" "2013-08-10" "2013-08-11" ... 
$ :‘zoo’ series from 2013-08-08 to 2013-09-09 
    Data: num [1:33] 0 0 0 0 0 ... 
    Index: POSIXct[1:33], format: "2013-08-08" "2013-08-09" "2013-08-10" "2013-08-11" ... 
$ :‘zoo’ series from 2013-08-08 to 2013-09-09 
    Data: num [1:33] 7.4 10.7 0 0 0 ... 
    Index: POSIXct[1:33], format: "2013-08-08" "2013-08-09" "2013-08-10" "2013-08-11" ... 
$ :‘zoo’ series from 2013-08-08 to 2013-09-09 
    Data: num [1:33] 0 588 0 0 0 ... 
    Index: POSIXct[1:33], format: "2013-08-08" "2013-08-09" "2013-08-10" "2013-08-11" ... 

을 지금, 나는 그렇게함으로써 그 동물원 요소의 합을 플롯 할 수 있습니다 : 나는 궁금

plot(z <- a[[1]] + a[[2]] + a[[3]] + a[[4]]) 

을 추가하는 작업을 수행 할 수있는 쉬운 방법이 목록 안의 모든 요소를 ​​올리십시오. 와 비슷한 것

# PYSEUDO CODE NOT WORKING! 
plot(z <- foo(a)) 

고마워요!

답변

5

잘 모르겠지만 Reduce()을 찾고 있다고 생각합니다. 그렇지 않다면 샘플 데이터와 원하는 결과가있는 예를 제공해주세요. 다음 예제를 고려하십시오.

> a <- list(rnorm(5),rnorm(5),rnorm(5),rnorm(5)) 
> a[[1]] + a[[2]] + a[[3]] + a[[4]] 
[1] 1.06310824 -0.20176594 -2.09269676 0.01593767 -1.30949132 
> Reduce("+",a) 
[1] 1.06310824 -0.20176594 -2.09269676 0.01593767 -1.30949132 
+0

분명히 내 질문을 이해하고 나에게 분명히 답변했습니다. 감사합니다. –

관련 문제