Convert days to years using R lubridate

Question

Assuming the following dataframe:

library(dplyr)
library(lubridate)

df<-data.frame(inicio= ymd(19800101), fim=ymd(20200101)) %>% 
  mutate(dif=fim-inicio)

     inicio        fim        dif
1 1980-01-01 2020-01-01 14610 days

How do I convert those 14610 days into years (or months, or weeks)?

SEQUENCE

df %>% 
  mutate(em.anos= time_length(dif, unit = "year"))

  inicio        fim          dif  em.anos
1 1980-01-01 2020-01-01 40.0274 days 0.109589

Answer 1

Use the function time_length with argument unit="year" and interval(inicio, fim) in place of subtraction.

Ref: https://www.rdocumentation.org/packages/lubridate/versions/1.7.9/topics/time_length

Answer 2

With difftime:

library(dplyr)
library(lubridate)

In weeks weeks:

data.frame(inicio= ymd(19800101), fim=ymd(20200101)) %>% 
  mutate(dif = difftime(fim, inicio, units = "weeks"))

In years (division of weeks obtained by the number of weeks present in a year ~ 52.25):

data.frame(inicio= ymd(19800101), fim=ymd(20200101)) %>% 
  mutate(dif = difftime(fim, inicio, units = "weeks") / 52.25)

You could also get seconds, minutes, hours and days by entering the parameters below in the argument units:

“secs”, “mins”, “hours”, “days”