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"

上帝（或某人）知道为什么它不适用于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可以更改时区属性（实际上是约书亚所描述的）。

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"

更改POSIXct对象中的时区

3 个答案: