Question

我正在尝试对嵌套列表的许多数据帧求和（矩阵求和的种类；一个数据帧中的同一单元格，另一单元格中的同一单元格...）。该列表分为三个级别：

-第一级别由数字表示（例如1到5）

-第二级别包括月份（从一月到十二月）< / p>

-数据帧的第三级内容（31行31列）。

所以我想做的是获取一个新的数据框，该数据框具有从1到5的同一月份的总和。

如果我对以下数据帧求和，我会得到想要的结果：

month <- listname[[1]][["month"]] + listname[[2]][["month"]] + listname[[3]][["month"]] + listname[[4]][["month"]]....

因为我必须将数字1到N的此过程自动化，所以我不能使用上面示例中使用的加法。

我希望你这个社区的好人能帮助我找到解决方案。

格雷戈尔

Answer 1

查看下面的方法是否有效。结果应该是列出每个月所需结果的列表

# change months to in format as in your data.
months <- c("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec")

lapply(months, function(month){
  Reduce(`+`,
         lapply(listname, function(x) {
           x[[month]]
         }))
})

将r

1 个答案: