Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- library(lubridate)
- ref_date <- dmy('01-10-1966')
- new_date <- dmy('17/12/1966')
- day_number <- as.numeric(difftime(new_date, ref_date))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement