如何计算每周每小时的平均值答案

【问题标题】：How to calculate hourly averages per week如何计算每周每小时的平均值
【发布时间】：2017-12-23 15:21:45
【问题描述】：

DateTime totalgen

我有一个大约有 200k 行的数据框，显示了几个月时间跨度内的访问者数据。我想绘制每个季节的图表（共 4 个图），显示一周内每 15 分钟的平均访客数量。每幅图，

x 轴 = 从周一 00:00:00 到周日 23:45 的时间序列，
y 轴 = 给定时间戳的平均访问者数量

head(dataset, 9)

            <DateTime>    <visitors>
 1 2014-12-01 00:00:00        12
 2 2014-12-01 00:15:00        2335
 3 2014-12-01 00:30:00        2366
 4 2014-12-01 00:45:00        12254
 5 2014-12-01 01:00:00        45
 6 2014-12-01 01:15:00        0
 7 2014-12-01 01:30:00        0
 8 2014-12-01 01:45:00        12
 9 2014-12-01 02:00:00        122

如何计算 15 分钟时间戳的平均访问量？

【问题讨论】：

标签： r time-series

【解决方案1】：

使用lubridate

library(lubridate)
ds <- dataset %>% 
        rowwise() %>%
        mutate(dummy = paste0(week(ymd_hms(DateTime)), hour(ymd_hms(DateTime)), minute(ymd_dms(DateTime)))) %>%
        ungroup() %>%
        group_by(dummy) %>%
        summarise(visitors=mean(visitors))

【讨论】：