guess_formats + R + lubridate
Estou tendo problemas para entender como usar a função guess_formats no lubrificado. Eu tenho um vetor de datas em algum conjunto / ordem de formatos desconhecidos. Gostaria de convertê-los em um objeto Date (ou pelo menos converter o maior número possível). O código a seguir é o que eu tentei:
library(lubridate)
sampleDates <- c("4/6/2004","4/6/2004","4/6/2004","4/7/2004",
"4/6/2004","4/7/2004","2014-06-28","2014-06-30","2014-07-12",
"2014-07-29","2014-07-29","2014-08-12")
formats <- guess_formats(sampleDates, c("Ymd", "mdY"))
dates <- as.Date(sampleDates, format=formats)
Isso dá a todos os NAs.
Este é obviamente apenas um pequeno exemplo. No caso real, eu não saberia onde os vários formatos estão espalhados e não teria 100% de certeza de que existem apenas% m /% d /% Y e% Y-% m-% d. Alguém poderia me avisar A. como os palpites seriam usados neste exemplo ou B. Existe algo mais apropriado para usar no lubrificado / base R, espero que sem muita regex. Obrigado!
Edit: Eu também tentei parse_date_time. O que não entendo são os seguintes trabalhos para este exemplo:
parse_date_time(sampleDates,
orders = c("Ymd", "mdY"),
locale = "eng")
Mas isso não:
parse_date_time(sampleDates,
orders = c("mdY", "Ydm"),
locale = "eng")
No meu conjunto real de dados, não saberei a ordem da formatação, o que parece ser importante para esta função.
Edição dupla: Dur, OK, vejo que Ymd no primeiro exemplo parse_date_time e Ydm no segundo ... continue.