> class(lista.exames[,"Data de Liberação:"])
[1] "character"
> dt.hr <- lista.exames[,"Data de Liberação:"][1:10]
> strptime(dt.hr, format = "%d/%m/%Y %H:%M:%S")
[1] NA NA NA NA NA NA NA NA NA NA
# não deu certo > dput(lista.exames[,"Data de Liberação:"][1:10])
c("10/06/2007 01:03:34", "10/06/2007 01:03:34", "10/06/2007 01:03:34",
"10/06/2007 01:03:34", "10/06/2007 01:03:34", "10/06/2007 01:03:34",
"10/06/2007 01:03:34", "10/06/2007 01:03:34", "10/06/2007 01:03:34",
"10/06/2007 01:03:34")
> dt.hr <- c("10/06/2007 01:03:34", "10/06/2007 01:03:34", "10/06/2007 01:03:34",
+ "10/06/2007 01:03:34", "10/06/2007 01:03:34", "10/06/2007 01:03:34",
+ "10/06/2007 01:03:34", "10/06/2007 01:03:34", "10/06/2007 01:03:34",
+ "10/06/2007 01:03:34")
> strptime(dt.hr, format = "%d/%m/%Y %H:%M:%S")
[1] "2007-06-10 01:03:34 BRT" "2007-06-10 01:03:34 BRT" "2007-06-10 01:03:34 BRT"
[4] "2007-06-10 01:03:34 BRT" "2007-06-10 01:03:34 BRT" "2007-06-10 01:03:34 BRT"
[7] "2007-06-10 01:03:34 BRT" "2007-06-10 01:03:34 BRT" "2007-06-10 01:03:34 BRT"
[10] "2007-06-10 01:03:34 BRT"
|