DateTime totalgen
我有一个大约20万行的数据框,显示了多个月的访问者数字。我想绘制每个季节的图表(总共4个地块),显示一周内每15分钟的平均访客数量。每个情节,
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分钟时间戳的平均访问者数量?
答案 0 :(得分:2)
使用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))