R中将字符型时间戳转日期时间戳时H:M:S丢失问题求助

问题根因 #

• as.POSIXct调用参数错误：你没有显式指定format参数名，导致你写的格式字符串被传递给了第二个参数tz（时区参数），因此出现"未知时区"的报错，转换逻辑不符合预期。
• 打印显示的假阳性问题：你所有的时间都是00:00:00，R的控制台默认打印POSIXct类型数据时，会自动省略零点的时分秒部分，但实际数据中时分秒信息是完整保留的，并没有被移除。

验证数据完整性的方法 #

你可以用以下代码确认时分秒信息是否存在：

# 用lubridate正确转换后，查看数据的底层数值（Unix时间戳，单位秒）
library(lubridate)
timesdf$DateTime <- ymd_hms(timesdf$DateTime)
# 查看第一个值的数值形式，会显示对应2021-02-20 00:00:00的时间戳
as.numeric(timesdf$DateTime[1])
# 强制显示完整时间格式
format(timesdf$DateTime[1], "%Y-%m-%d %H:%M:%S")
# 查看数据结构，确认是POSIXct类型带完整时间信息
str(timesdf)

正确转换方案 #

lubridate方案（最简便） #

library(lubridate)
timesdf$DateTime <- ymd_hms(timesdf$DateTime, tz = "Asia/Shanghai") # 按需替换为你需要的时区

基础包as.POSIXct方案 #

# 必须显式指定format参数名
timesdf$DateTime <- as.POSIXct(timesdf$DateTime, format = "%Y-%m-%d %H:%M:%S", tz = "Asia/Shanghai")

强制控制台显示完整时分秒 #

如果希望控制台打印POSIXct数据时始终显示时间部分，可以修改全局打印选项：

options(digits.secs = 0, POSIXct.tz = "Asia/Shanghai")
# 再次打印就会显示完整时间
head(timesdf)

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