如何正确转换日期

Question

我有几个日期格式，需要使它们具有可比性

 31.03.2014 00:00 # day, month, year, time
 201410 # year, month
 07.10.2014 # day, month, year

我如何将它们转换为可比较的日期？我想执行＆gt;，＆lt;，=操作以及计算两个日期之间的天数。

Answer 1

查看lubridate

library(lubridate)
input <- c("31.03.2014 10:00", "201410", "07.10.2014")
x <- parse_date_time(input, orders = c("dmY HM", "dmY", "Ym"))
x[1] < x[2]
diff(x)
x + dseconds(1234)