如何使用 lubridate 将日期转换为日期时间到 R 中的 UNIX 纪元以来的秒数？

Question

我注意到这种非常令人困惑的行为。

library(lubridate)
x = as_date(-25567)
as.integer(as_datetime(x)) # Returns NA

我怎样才能让它返回自（或在这种情况下之前）UNIX 时代以来的秒数？

Answer 1

这适用于基础 R，现在我们已经介绍了您真正想要的as.Date("1970-01-01") 。

R> as.POSIXct("1900-01-01 00:00:00")    
[1] "1900-01-01 CST"                       
R> as.numeric(as.POSIXct("1900-01-01 00:00:00"))
[1] -2208967200        
R> 

我依稀记得对时代之前的日期的一些操作系统级别的刺激。 在世界上最常用的操作系统上，这对您来说可能会失败，但这并不是 R 的错......