Here you go:
R> data1$pt <- as.POSIXct(data1[,1]) # parse time from ISO string
R> data1$date <- as.Date(data1[,"pt"]) # transform to Date
R> data1$time <- format(data1[,"pt"], "%H:%M:%S") # transform to time string
R> data1
event.date VE pt date time
1 2012-09-27 07:05:59 45 2012-09-27 07:05:59 2012-09-27 07:05:59
2 2012-09-27 07:07:29 55 2012-09-27 07:07:29 2012-09-27 07:07:29
3 2012-09-27 07:15:59 45 2012-09-27 07:15:59 2012-09-27 07:15:59
4 2012-09-27 07:17:00 50 2012-09-27 07:17:00 2012-09-27 07:17:00
5 2012-09-27 07:17:29 55 2012-09-27 07:17:29 2012-09-27 07:17:29
6 2012-09-27 07:19:59 35 2012-09-27 07:19:59 2012-09-27 07:19:59
7 2012-09-27 07:21:29 30 2012-09-27 07:21:29 2012-09-27 07:21:29
8 2012-09-27 07:22:29 45 2012-09-27 07:22:29 2012-09-27 07:22:29
9 2012-09-27 07:22:59 55 2012-09-27 07:22:59 2012-09-27 07:22:59
10 2012-09-27 07:23:59 30 2012-09-27 07:23:59 2012-09-27 07:23:59
R>
And here are your column types, showing that I changed POSIXlt
to POSIXct
with the first command:
R> sapply(data1, class)
$event.date
[1] "POSIXlt" "POSIXt"
$VE
[1] "integer"
$pt
[1] "POSIXct" "POSIXt"
$date
[1] "Date"
$time
[1] "character"
R>