R 统计任何给定日期的观察值

我正在使用类似于以下内容的数据集：

df <- data.frame(type = c("A", "A", "A", "A", "A", "B", "B", "B", "C", "D", "D", "D"), 
                 start_date = as.Date(c("2010-02-01", "2011-03-15", "2011-09-15", "2015-01-01", "2015-05-15", "2009-01-01", "2015-07-14", "2016-06-30", "2012-01-15", "2010-04-05", "2010-08-01", "2012-04-01"), format = "%Y-%m-%d"), 
                 end_date = as.Date(c("2010-12-31", "2011-07-31", "2014-04-04", "2015-02-15", "2016-12-15", "2013-02-16", "2015-12-31", "2016-12-31", "2015-09-17", "2010-04-10", "2010-09-30", "2013-12-31"), format = "%Y-%m-%d"))

我以为这很容易做到，但我想不出来。。。有什么想法吗

---

干杯，

一个选项是

转换

，方法是在

日期之前取相应的
序列
的“开始日期”和“结束日期”，然后获得
计数

library(tidyverse)
df %>% 
   transmute(date = map2(start_date, end_date, seq, by = '1 day')) %>% 
   unnest %>% 
   count(date)

你能显示预期的输出吗。您是否需要
df%>%变异（n=as.integer（difftime（end\u date，start\u date，unit='day'））
也许您需要类似于a的东西？还有，也许这个问答可以帮上忙：我刚刚添加了预期的输出Hanks！就是这样。看起来很简单，但让我汗流浃背：）
library(tidyverse)
df %>% 
   transmute(date = map2(start_date, end_date, seq, by = '1 day')) %>% 
   unnest %>% 
   count(date)