为什么R聚合丢弃数据行？

Posted 2021-04-05

我有一个包含2列的数据框：日期和观测值。数据包含每个日期的多个观察值。

 str(observations)
tibble [2,599 × 2] (S3: tbl_df/tbl/data.frame)
 $ date        : chr [1:2599] "1/22/20" "1/22/20" "1/22/20" "1/22/20" ...
 $ observation : num [1:2599] 0 0 0 0 0 0 0 0 0 0 ...

> tail(observations)
# A tibble: 6 x 2
  date    observation
  <chr>       <dbl>
1 5/13/20      4127
2 5/13/20      1042
3 5/13/20     14306
4 5/13/20      1066
5 5/13/20         0
6 5/13/20        89

我想对这些观察结果进行汇总，以便为每个日期生成一行，因此我使用了此功能：

subs <- aggregate(cbind(observation) ~ date,data=observations, FUN = sum, na.rm = TRUE)

但是输出在原始文件的最后4天缺少任何行：

> tail(subs)
      date observation
108 5/4/20    128269
109 5/5/20    130593
110 5/6/20    131890
111 5/7/20    133991
112 5/8/20    135840
113 5/9/20    137397

答案

我很抱歉。在进一步调查中，似乎聚合函数无序地返回了该数据。我对数据框进行了重新排序，并确认已考虑所有日期。