55

在 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?

4

3 回答 3

75

它不起作用，POSIXct因为如果它已经是，则base::as.POSIXct.default简单地返回。您可以通过属性更改时区：xPOSIXcttzone

attr(data$dateTime, "tzone") <- "Europe/Paris"
于 2013-01-03T15:13:35.973 回答
40

在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"
于 2016-11-09T18:46:37.600 回答
0

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

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

于 2021-07-23T07:06:53.597 回答