R 如何将润滑间隔恢复为整天

我有两个日期，

start\u date

和

end\u date

，我已经计算了它们之间的间隔，我想将其显示为完整的天数。我希望下面的代码能够做到这一点，但它似乎返回了一个间隔，我做错了什么

df <- tibble(start_date = '2020-02-27', end_date = '2020-03-17')

times <- df %>% mutate(hol_time = interval(start_date, end_date))

times %>% mutate(hol_dur = hol_time %% days(1))

df%突变（hol_dur=hol_time%%天（1））

输出：

  start_date end_date   hol_time                       hol_dur                       
  <chr>      <chr>      <Interval>                     <Interval>                    
1 2020-02-27 2020-03-17 2020-02-27 UTC--2020-03-17 UTC 2020-03-17 UTC--2020-03-17 UTC

start\u date end\u date hol\u time hol\u dur
1 2020-02-27 2020-03-17 2020-02-27 UTC--2020-03-17 UTC 2020-03-17 UTC--2020-03-17 UTC--2020-03-17 UTC

改用

/

：

> times$hol_time/days(1)
[1] 19