ordenar - Cambiar la zona horaria en un objeto POSIXct

ordenar fechas en r

Question

Jugar con dateTimes y zona horaria puede ser complicado en R. Aquí está mi pregunta: Quiero cambiar la zona horaria en un objeto POSIXct

R) data <- data.frame(x=c(1,2),dateTime=as.POSIXct(c("2010-03-11 03:30:00.432","2010-03-15 03:30:00.432"),format="%Y-%m-%d %H:%M:%S",tz="America/Montreal"))
R) data
x dateTime
1 1 2010-03-11 03:30:00
2 2 2010-03-15 03:30:00
R) str(data)
''data.frame'': 2 obs. of 2 variables:
$ x : num 1 2
$ dateTime: POSIXct, format: "2010-03-11 03:30:00" "2010-03-15 03:30:00"

Pero si quiero cambiar la zona horaria, lo único que encontré es:

R) data$dateTime2 = format(data$dateTime,tz="Europe/Paris")
R) str(data)
''data.frame'': 2 obs. of 3 variables:
$ x : num 1 2
$ dateTime : POSIXct, format: "2010-03-11 03:30:00" "2010-03-15 03:30:00"
$ dateTime2: chr "2010-03-11 09:30:00" "2010-03-15 08:30:00"

O

R) data$dateTime2 = as.POSIXlt(data$dateTime,tz="Europe/Paris")
R) str(data)
''data.frame'': 2 obs. of 3 variables:
$ x : num 1 2
$ dateTime : POSIXct, format: "2010-03-11 03:30:00" "2010-03-15 03:30:00"
$ dateTime2: POSIXlt, format: "2010-03-11 09:30:00" "2010-03-15 08:30:00"

Dios (o alguien en SO) sabe por qué no funciona con POSIXct

R) data$dateTime2 = as.POSIXct(data$dateTime,tz="Europe/Paris")
R) str(data)
''data.frame'': 2 obs. of 3 variables:
$ x : num 1 2
$ dateTime : POSIXct, format: "2010-03-11 03:30:00" "2010-03-15 03:30:00"
$ dateTime2: POSIXct, format: "2010-03-11 03:30:00" "2010-03-15 03:30:00"

¿Debo convertir a character y devolverlo a POSIXct ?

Answer 1

En el paquete lubridate hay una función with_tz que cambia el atributo de la zona horaria (efectivamente lo que Joshua describió).

dttm <- as.POSIXct("2016-01-01 10:10:10", tz = "UTC")
dttm
[1] "2016-01-01 10:10:10 UTC"

Cambiar la zona horaria de UTC a CET

with_tz(dttm, "CET")
[1] "2016-01-01 11:10:10 CET"

Answer 2

No funciona con POSIXct porque base::as.POSIXct.default simplemente devuelve x si ya es POSIXct . Puede cambiar la zona horaria a través del atributo tzone :

attr(data$dateTime, "tzone") <- "Europe/Paris"