r - 从R中的日期时间提取日期的最快方法

Question

我有一列以日期为字符，格式为10/17/2017 12:00:00 AM。我只想保留日期部分，即2017-10-17。我在用 -

df$ReportDate = as.Date(df$ReportDate, format = "%m/%d/%Y %I:%M:%S %p") 
df$ReportDate = as.Date(format(df$ReportDate, "%Y-%m-%d"))

这行得通，但是数据帧有超过500万行，因此需要近两分钟的时间。

  user  system elapsed 
104.73    0.55  105.46 

有更快，更有效的方法吗？

Answer 1

请注意，as.Date在日期之后将忽略垃圾，因此在我使用的不是特别快的笔记本电脑上，此过程不到10秒：

xx <- rep("10/17/2017 12:00:00 AM", 5000000) # test input
system.time(as.Date(xx, "%m/%d/%Y"))
## user  system elapsed 
## 9.57    0.20    9.82