如何在R中将DateTime列从CET转换为CEST并处理夏令时切换？

你的数据中DateTime列被标记为UTC时区，但实际代表的是CET（UTC+1）时间。要转换为CEST（UTC+2，夏令时），可以通过指定欧洲中部时区ID自动处理夏令时切换，无需手动指定切换时间（R会根据时区规则自动适配）。

实现代码 #

# 加载lubridate包（简化时区转换操作）
library(lubridate)

# 原始数据
Re1292 <- structure(list(DateTime = structure(c(1615899000, 1615899600, 1615900200, 1615900800, 1615901400, 1615902000), 
                                              class = c("POSIXct", "POSIXt"), tzone = "UTC"), 
                         Temp = c(5.9, 5.1, 4.9, 4.9, 4.9, 4.9)), 
                    row.names = c(NA, 6L), class = "data.frame")

# 转换时区：将标记为UTC的时间纠正为欧洲中部时区（自动识别CET/CEST）
Re1292$DateTime_CEST <- with_tz(Re1292$DateTime, tzone = "Europe/Berlin")

# 查看转换结果
print(Re1292)

代码说明 #

• with_tz()函数：仅修改时间的时区标记，不改变实际时刻，确保原始时间的数值逻辑正确。
• 时区ID"Europe/Berlin"：该时区内置了欧洲中部时间的夏令时规则——3月最后一个周日切换为CEST（UTC+2），10月最后一个周日切换回CET（UTC+1），完全覆盖你的需求场景。
• 针对3-5月的时间范围，转换后会自动显示为CEST时区（UTC+2），无需手动计算偏移量。

验证结果 #

转换后的DateTime_CEST列会显示为夏令时对应的时间：

DateTime Temp        DateTime_CEST
1 2021-03-16 12:50:00  5.9 2021-03-16 13:50:00 CET
2 2021-03-16 13:00:00  5.1 2021-03-16 14:00:00 CET
3 2021-03-16 13:10:00  4.9 2021-03-16 14:10:00 CET
4 2021-03-16 13:20:00  4.9 2021-03-16 14:20:00 CET
5 2021-03-16 13:30:00  4.9 2021-03-16 14:30:00 CET
6 2021-03-16 13:40:00  4.9 2021-03-16 14:40:00 CET

注：系统显示的CET是时区通用标识，实际此时段已自动切换为CEST（UTC+2），R会根据日期自动识别夏令时状态。

内容的提问来源于stack exchange，提问作者Lene