是否可以获得日期范围而不是周数？

Question

structure(list(ReviewType= c("Primary", "Secondary", "Secondary", "Primary", "Secondary"), Submissiondate= c("2020-09-04", "2020-09-03","2020-09-02","2020-09-01","2020-08-31" ),Channel= c("OC", "BC","BC","BC","PK" )), class = "data.frame", row.names = c(NA, -5L))

我在下面有一个查询和其他查询，我想对其进行编辑，而不是给我周数，而是告诉我那一周的日期范围：

FinalCounting<-Out %>%
  group_by(Year = year(Submissiondate), Week = week(Submissiondate)) %>% 
  summarise(Primary = sum(ReviewType == "Primary"), 
            Secondary = sum(ReviewType == "Secondary"))

当查询为运行时，它会给出如下输出：

如果我得到的不是 36，而是 2020-08-31 - 2020-09-04，甚至只是该范围的最后一个日期，那么我可以将其称为截至报告日期，这可能吗？感谢任何帮助。

Answer 1

只需创建一个包含 Week = paste(lubridate::floor_date(Submissiondate, unit = "weeks"), "-", lubridate::ceiling_date(Submissiondate, unit = "weeks")) 的列。

您应该能够将其放入 group_by 语句或之前的 mutate 中（为了提高可读性）。

是否可以获得日期范围而不是周数？

Instead of week number, is it possible to get a date range?

r

lubridate

dplyr