R中总子集的每个特定列的总和

我刚开始学习R，我想用它来模拟期权定价。 我编写了一个函数来创建1000个data.frames，如下所示。 我想知道每个“周期”t的“yBaseCcy”的意思，无论如何，要这样做吗

[[9]]
  Period ccyPairs        x    K     P        IV yBaseCcy yTermCcy LyBaseCcy
1      1   USDZAR 13.03787 12.8 0e+00 0.0000000     0.00      0.0         0
2      2   USDZAR 12.52903 12.8 1e+06 0.2709659 21627.04 270965.9         0

[[10]]
  Period ccyPairs        x    K     P        IV yBaseCcy yTermCcy LyBaseCcy
1      1   USDZAR 12.09013 12.8 0e+00 0.7098709        0        0         0
2      2   USDZAR 12.01183 12.8 1e+06 0.0000000        0        0         0

---

如果所有数据帧都具有相同的结构（相同的行数，其中每行的周期相同），则可以从每个数据帧中提取感兴趣的向量，将它们相加，然后除以总数：

Reduce("+", lapply(dat, function(x) x$yBaseCcy)) / length(dat)
# [1] 3 4

样本数据：

(dat <- list(data.frame(Period=1:2, yBaseCcy=1:2), data.frame(Period=1:2, yBaseCcy=3:4), data.frame(Period=1:2, yBaseCcy=5:6)))
# [[1]]
#   Period yBaseCcy
# 1      1        1
# 2      2        2
# 
# [[2]]
#   Period yBaseCcy
# 1      1        3
# 2      2        4
# 
# [[3]]
#   Period yBaseCcy
# 1      1        5
# 2      2        6

---

（dat您是否也可以显示此示例数据的预期输出？谢谢您的示例，我发现它对应用高阶函数很有用！