更改列中的多个日期格式

Question

我有一个数据框的列，其中一些日期格式为

"2015-06-04"

和其他日期

"Thu Jun 04 15:12:10 2015"

有没有办法匹配格式，然后添加strptime()？

我尝试使用

for (i in 1:length(d1)){
  if((d1[i]) !=format("%Y-%m-%d")){
   d1[i]<- as.Date(strptime(d1[i], "%a %b %d %H:%M:%S %Y"))
  }
}

d1是我的日期列表。

Answer 1

@David Arenburg最终在这里解决：

indx <- grepl("[A-Za-z]", d1) ; d1[indx] <- as.character(as.Date(strptime(d1[indx], format = "%a %b %d %H:%M:%S %Y")))