r - 获取自 R 中 Epoch 以来的天数、月数和周数

Question

在 R 中获取自 Epoch 时间以来的天数、月数和周数的最佳方法是什么？

(Java 存在解决方案:Get the number of days, weeks, and months, since Epoch in Java)

我知道从纪元中获取秒数，但是如何获取周数？

as.integer( Sys.time())   #.... gives number of seconds since epoch time

Answer 1

一种选择是使用 lubridate::interval 作为:

library(lubridate)


span <- interval(ymd_hms("1970-01-01 00:00:00"), Sys.time())

as.period(span, unit = "days")
#[1] "17622d 19H 57M 10.5912010669708S"

as.period(span, unit = "months")
#[1] "579m 0d 19H 57M 10.5912010669708S"


as.period(span, unit = "years")
#[1] "48y 3m 0d 19H 57M 10.5912010669708S"