将数字转换为 R 中的日期和日期时间?

Convert number to date and datetime in R?

我有这些数字:

-44384.520833333299(截至日期时间)。应该是 07/07/2021 12:30:00

-44384(迄今为止)。应该是 07/07/2021

如何在 R 中转换这些数字和它们的列表?

openxlsx::convertToDateTime(44384.520833333299)
# [1] "2021-07-07 12:30:00 CEST"
openxlsx::convertToDate(44384)
# [1] "2021-07-07"

另一种可能性,使用lubridate:

library(lubridate)

# The first argument must be in seconds

as_datetime(3600*24*44384.520833333299, origin="1899-12-30")

#> [1] "2021-07-07 12:29:59 UTC"

as_date(44384, origin="1899-12-30")

#> [1] "2021-07-07"