使用dplyr和lubridate进行分组

使用dplyr和lubridate进行分组,r,dplyr,lubridate,R,Dplyr,Lubridate,我需要确定队列中有多少人在等待打电话到服务台(想想服务:银行分行、邮局等)。我有相关数据:日期(年、月、日)、每个人的到达时间(年、月、日、小时、分钟、秒)和每个人的桌面通话时间(年、月、日、小时、分钟、秒) 我的想法是:由于dplyr和lubridate,派生出一个子集。我会考虑某个时间点(例如某一天的7.43),并考虑考虑到客户到达且未被呼叫到服务台时有多少人在等待。我的代码是: subset <- df %>% filter(day(Date) == 5 & arr

我需要确定队列中有多少人在等待打电话到服务台(想想服务:银行分行、邮局等)。我有相关数据:日期(年、月、日)、每个人的到达时间(年、月、日、小时、分钟、秒)和每个人的桌面通话时间(年、月、日、小时、分钟、秒)

我的想法是:由于dplyr和lubridate,派生出一个子集。我会考虑某个时间点(例如某一天的7.43),并考虑考虑到客户到达且未被呼叫到服务台时有多少人在等待。我的代码是:

subset <- df %>%
  filter(day(Date) == 5 & arrival_time < "2017-06-05 07:43:00" & 
  call_time > "2017-06-05 07:43:00")
子集%
过滤器(日期)==5和到达时间<“2017-06-05 07:43:00”和
电话时间>“2017-06-05 07:43:00”)
没有错误(它可以工作),但是结果是零,我清楚地看到这个子集不是空的。我的代码怎么了?
非常感谢

只是一个猜测:类“POSIXct”的
日期列是吗?也就是说,这是约会吗?你也需要根据日期过滤它。使用
lubridate
可以按如下方式进行:

library(lubridate)
subset <- df %>%
  filter(day(Date) == 5 & arrival_time < ymd_hms("2017-06-05 07:43:00") & 
    call_time > ymd_hms("2017-06-05 07:43:00"))
库(lubridate)
子集%
过滤器(日期)==5,到达时间
不可能不查看您的数据,但可能:
到达时间>
呼叫时间,如果您使用的是
dplyr
您不需要像这样
。语句之间的逗号分隔默认为