如何在R中将每日数据转换为每周数据[重复]答案

【问题标题】：How to transform daily data into weekly data in R [duplicate]如何在R中将每日数据转换为每周数据[重复]
【发布时间】：2020-10-24 21:19:49
【问题描述】：

我有每日设备曝光数据，我想将其转换为每周数据。我知道以前有人问过这个问题，但我无法弄清楚，因为我对 R 很陌生。

如何将其转换为按县代码（总共 88 个）的每周计数，并将设备曝光量、县内设备总数、调整曝光量和调整后的设备总数按周求和？

【问题讨论】：

欢迎来到 StackOverflow！您能否编辑您的问题以将您的示例数据包含为（代码格式，即通过将其包围在“代码围栏” - 三反引号中）剪切和粘贴的文本，而不是屏幕截图？或者，使用dput() 包含您的数据样本（请参阅stackoverflow.com/questions/5963269/…）
另外：到目前为止，您尝试/发现了什么？ stackoverflow.com/questions/40554231/…
感谢您尝试按照我的要求修改您的问题，但这根本不是我的意思 - 例如，请参阅最近的问题：stackoverflow.com/questions/64517896/…

标签： r aggregate

【解决方案1】：

使用dplyr 和lubridate 试试这个。使用week 提取正确格式化日期后的星期，然后按县和星期分组并使用summarise() 获得所需的变量。这里是代码（未测试，因为没有共享数据）。还要注意 @BenBolker 所说的可重现问题。

library(dplyr)
library(lubridate)
#Code
df %>% mutate(date=as.Date(date,'%m/%d/%y'),
              Week=Week(date)) %>% select(-date) %>%
  group_by(county,Week) %>%
  summarise(Count=n(),
            DevExp=sum(dex,na.rm=TRUE),
            NumDev=sum(num_devices,na.rm=TRUE),
            Adexp=sum(dex_a,na.rm=TRUE),
            NumDevA=sum(num_devices_a,na.rm=TRUE))

【讨论】：