在POSIXct对象中更改时区

Question

在R中使用dateTimes和timezone可能会很棘手。下面是我的问题:我想更改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"

但是如果我想更改时区，我发现的唯一东西是:

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"

或

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"

上帝(或SO上的某人)知道为什么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"

我是否需要转换为character并转换回POSIXct ?

Answer 1

它不与POSIXct工作，因为base::as.POSIXct.default只是返回x，如果它已经是POSIXct。您可以通过tzone属性更改时区:

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

Answer 2

在lubridate包中有一个函数with_tz用于更改时区属性(实际上是Joshua所描述的)。

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

将UTC时区更改为CET时区

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

Answer 3

截至2021年7月23日。indexTZ已弃用。tzone很好用。

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