将 POSIXct 日期时间转换为日期时出现意外日期 - 时区问题？答案

【问题标题】：Unexpected date when converting POSIXct date-time to Date - timezone issue?将 POSIXct 日期时间转换为日期时出现意外日期 - 时区问题？
【发布时间】：2021-06-02 23:16:30
【问题描述】：

当我尝试使用 as.Date 将 POSIXct 日期时间强制为 Date 时，它似乎返回了错误的日期。

我怀疑这与时区有关。我在as.Date 中尝试了tz 参数，但它没有给出预期的日期。

# POSIXct returns day of month 24  
data$Time[3]
# [1] "2020-03-24 00:02:00 IST"

class(data$Time[3])
# [1] "POSIXct" "POSIXt"

# coerce to Date, returns 23 
as.Date(data$Time[3])
# [1] "2020-03-23"

# try the time zone argument, without luck
as.Date(data$Time[3], tz = "IST")
# [1] "2020-03-23"
# Warning message:
# In as.POSIXlt.POSIXct(x, tz = tz) : unknown timezone 'IST' 

Sys.timezone()
# [1] "Asia/Calcutta"

您有什么想法吗？

【问题讨论】：

标签： r date datetime timezone posixct

【解决方案1】：

线索在警告信息中。 as.Date() 不知道如何将 IST 解释为时区，因此默认为 UTC。假设 IST 是印度标准时间（而不是 爱尔兰 标准时间）并且 IST 是 UTC+5:30，as.Date() 给出了预期的结果，即使如果它不符合您的目的。

提供一个带有表示为与 UTC 的偏移量的时区的日期可以获得所需的结果。

as.Date("2020-03-24 00:02:00 UTC+5:30")
[1] "2020-03-24"

【讨论】：

谢谢！它确实是印度人而不是爱尔兰人！ :) 我认为“IST”会这样做，因为第一个 posixCT 输出本身就有一个 IST！显然不是！是否有可以接受哪些时区缩写的列表？我翻遍了帮助文档，但找不到。
现在的问题是我已经有一个数据框data，其中2020-03-24 00:02:00 IST 等日期值存储在data$time 中我是否必须对它们进行字符串操作才能获得UTC+5:30那里？要么....？我使用data$Time<-as.POSIXct(data$Time,format="%m-%d-%y %I:%M %p") 创建数据框的地方是否有错误我应该以不同的方式执行此操作以便时区在此处被编码吗？

【解决方案2】：

使用最后注释中的设置，我们可以使用以下任何一种：

# same date as print(x) shows
as.Date(as.character(x))
## [1] "2020-03-24"

# use the time zone stored in x (or system time zone if that is "")
as.Date(x, tz = attr(x, "tzone"))
## [1] "2020-03-24"

# use system time zone
as.Date(x, tz = "")
## [1] "2020-03-24"

# use system time zone
as.Date(x, tz = Sys.timezone())
## [1] "2020-03-24"

# use indicated time zone
as.Date(x, tz = "Asia/Calcutta")
## [1] "2020-03-24"

注意

我们假设了这个设置。

Sys.setenv(TZ = "Asia/Calcutta")
x <- structure(1584988320, class = c("POSIXct", "POSIXt"), tzone = "")

R.version.string
## [1] "R version 4.0.2 Patched (2020-06-24 r78745)"

【讨论】：

谢谢！输出是structure(1584988320, class = c("POSIXct", "POSIXt"), tzone = "")，是的，您发布的成语似乎有效：as.Date(data$Time[3], tz = "Asia/Calcutta")
这也很好用！ as.Date(x, tz = attr(x, "tzone"))非常感谢！
Sys.timezone() 给了[1] "Asia/Calcutta" 相应地编辑了问题。
第一个成语as.Date(x, tz = check_tzones(x)) 似乎失败了。 check_tzones(data$Time[3]) 给NULL
是的，我也无法让那个工作。我已经修改了答案，只包括那些有效的答案，并添加了一个说明如何重现输入的注释。