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

debugcn 发表于 Dev

谭Tan

我刚开始学习R，我想将其用于模拟期权定价。我写了一个函数来创建1000个data.frames，如下所示。无论如何，我想在每个“ Period” 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

本文收集自互联网，转载请注明来源。

如有侵权，请联系[email protected] 删除。