根据R中组内的每日数据计算月平均值[重复]答案

【问题标题】：Compute monthly average from daily data within groups in R [duplicate]根据R中组内的每日数据计算月平均值[重复]
【发布时间】：2018-11-27 21:38:16
【问题描述】：

我正在尝试根据数据中每个组的每日数据计算月平均值。在此示例中，有 3 个组，每个组从 2011-01-01 到 2011-03-31 进行每日观察

times <- c(31,28,31)
date = rep(seq(as.Date('2011-01-01'),as.Date('2011-03-31'),by = 1),
       times=3)
id = rep(rep(1001:1003, times), each=3)
val = rnorm(length(id), mean=5, sd=2)
df <- data.frame(date, id, val)

> head(df)
  date   id      val
1 2011-01-01 1001 6.341471
2 2011-01-02 1001 4.353585
3 2011-01-03 1001 8.131239
4 2011-01-04 1001 3.761434
5 2011-01-05 1001 6.344846
6 2011-01-06 1001 7.068889   


> tail(df)
      date   id      val
265 2011-03-26 1003 5.644132
266 2011-03-27 1003 4.949719
267 2011-03-28 1003 4.490786
268 2011-03-29 1003 1.739529
269 2011-03-30 1003 2.250610
270 2011-03-31 1003 1.853057

所需的输出应该是这样的，计算出的每月值：

monthYear  id    monthlyValue
2011-01    1001  ?
2011-02    1001  ?
2011-03    1001  ?
....       ....  ..
2011-01    1003  ?
2011-02    1003  ?
2011-03    1003  ?

【问题讨论】：

现在，df$val 填充了相同的值。如果您在data.frame() 函数调用（e.g. df$val <- rnorm(...)）之外将随机值分配给df$val，这将解决此问题

标签： r

【解决方案1】：

> output <- aggregate(df$val, list(format(df$date, "%Y-%m"), df$id), mean)
> colnames(output) <- c('monthYear', 'id', 'monthlyValue')
> print(output)
  monthYear   id monthlyValue
1   2011-01 1001     5.368910
2   2011-02 1001     4.701553
3   2011-03 1001     5.225284
4   2011-01 1002     5.117631
5   2011-02 1002     4.869240
6   2011-03 1002     4.595431
7   2011-01 1003     5.336175
8   2011-02 1003     5.438803
9   2011-03 1003     4.658504

【讨论】：