Format for ordinal dates (day of month with suffixes -st, -nd, -rd, -th)

by

Enjoy the power of lubridate:

library(lubridate)    
mdy(ord_dates)

[1] "2016-09-01" "2016-09-02" "2016-09-03" "2016-09-04"

Internally, lubridate doesn’t have any special conversion specifications which enable this. Rather, lubridate first uses (by smart guessing) the format "%B %dst, %Y". This gets the first element of ord_dates.

It then checks for NAs and repeats its smart guessing on the remaining elements, settling on "%B %dnd, %Y" to get the second element. It continues in this way until there are no NAs left (which happens in this case after 4 iterations), or until its smart guessing fails to turn up a likely format candidate.

You can imagine this makes lubridate slower, and it does — about half the speed of just using the smart regex suggested by @alistaire above:

set.seed(109123)
ord_dates <- sample(
  c("September 1st, 2016", "September 2nd, 2016",
    "September 3rd, 2016", "September 4th, 2016"),
  1e6, TRUE
  )

library(microbenchmark)

microbenchmark(times = 10L,
               lubridate = mdy(ord_dates),
               base = as.Date(sub("\\D+,", "", ord_dates),
                              format = "%B %e %Y"))
# Unit: seconds
#       expr      min       lq     mean   median       uq      max neval cld
#  lubridate 2.167957 2.219463 2.290950 2.252565 2.301725 2.587724    10   b
#       base 1.183970 1.224824 1.218642 1.227034 1.228324 1.229095    10  a

The obvious advantage in lubridate‘s favor being its conciseness and flexibility.

More Related Contents:

  1. How to prevent ifelse() from turning Date objects into numeric objects
  2. Convert date-time string to class Date
  3. Converting year and month (“yyyy-mm” format) to a date?
  4. Changing date format in R
  5. Split date-time column into Date and time variables
  6. Find which season a particular date belongs to
  7. Generate a sequence of the last day of the month over two years
  8. Is there a more elegant way to convert two-digit years to four-digit years with lubridate?
  9. R: How to handle times without dates?
  10. Extract Month and Year From Date in R
  11. Split date into different columns for year, month and day
  12. Converting Date formats in R [closed]
  13. convert character to date *quickly* in R [duplicate]
  14. Converting date in Year.decimal form in R
  15. How to subtract years?
  16. Change day of the month in a Date to first day (01)
  17. Subsetting a dataframe for a specified month and year
  18. Sort year-month column by year AND month
  19. R ifelse avoiding change in date format [duplicate]
  20. Creating a unique sequence of dates
  21. How to account for leap years?
  22. Order x axis day values in ggplot2
  23. R: How to get the Week number of the month
  24. Convert integer as “20160119” to different columns of “day” “year” “month”
  25. Formatting a date in R without leading zeros
  26. R: xtable and dates
  27. change a column from birth date to age in r
  28. Convert decimal day to HH:MM
  29. Convert two-digit years to four-digit years with correct century
  30. Round a POSIX date (POSIXct) with base R functionality

Leave a Comment