Как преобразовать дату в дату и время в секунды, начиная с UNIX эпохи в R с lubridate?

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 ...