使用 dplyr 和 lubridate 在 R 中的两个日期之间的天数差异？

Question

想要在 R 中执行与 datediff 等效的 SQL 吗？

基本上，我想在 R 中进行这个计算

Delivery Date  Expected Date   Difference 
2022-01-05     2022-01-07         -2 
        

Answer 1

将列转换为Date class 并使用difftime

df1$Difference <-  with(df1, as.numeric(difftime(as.Date(DeliveryDate), 
           as.Date(ExpectedDate), units = "days")))

---

或使用tidyverse

library(dplyr)
library(lubridate)
df1 %>% 
  mutate(Difference = as.numeric(difftime(ymd(DeliveryDate), 
         ymd(ExpectedDate), units = "days")))
  DeliveryDate ExpectedDate Difference
1   2022-01-05   2022-01-07         -2

Answer 2

首先将您的日期更改为 lubridate date: 2022-01-05 将是

date1 <- ymd("2022-01-05") 
date2 <- ymd("2022-01-07")
diff_days <- difftime(date2, date1, units="days")