在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]])

---

<代码>图（Z

），我不确定我是否完全理解，但我认为你正在寻找<代码>还原（）>代码>，如果不是，请提供一个示例数据和你想要的结果的例子。

> 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

>a[[1]]+a[[2]+a[[3]]+a[[4]]
[1]  1.06310824 -0.20176594 -2.09269676  0.01593767 -1.30949132
>减少（“+”，a）
[1]  1.06310824 -0.20176594 -2.09269676  0.01593767 -1.30949132
< /代码> 我不确定我是否完全理解，但我认为你正在寻找<代码>还原（）>代码>，如果不是，请提供一个示例数据和你想要的结果的例子。
> 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

>a[[1]]+a[[2]+a[[3]]+a[[4]]
[1]  1.06310824 -0.20176594 -2.09269676  0.01593767 -1.30949132
>减少（“+”，a）
[1]  1.06310824 -0.20176594 -2.09269676  0.01593767 -1.30949132
您清楚地理解了我的问题并清楚地回答了我，谢谢！您清楚地理解了我的问题并清楚地回答了我，谢谢！