Advertisement
Guest User

Untitled

a guest
Jun 28th, 2016
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.13 KB | None | 0 0
  1. library(lubridate)
  2. ref_date <- dmy('01-10-1966')
  3. new_date <- dmy('17/12/1966')
  4. day_number <- as.numeric(difftime(new_date, ref_date))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement