ISOdate 转换问题

Question

我正在尝试使用 ISOdate 函数转换日期，但我遇到了 2 个问题：

将 1970 年之前的日期转换为 NA；
转换 1970 年之后的日期偏移 1 个月。

这是我使用的代码：

firstDate <- as.Date("1910-01-01", "%Y-%m-%d")
todayDate <-  Sys.Date() #Lets say its 2021-09-04
firstDatePOSIX <- as.POSIXlt(firstDate)
todayDatePOSIX <- as.POSIXlt(todayDate)
firstDateISO <- ISOdate(firstDatePOSIX$year + 1900, firstDatePOSIX$mon, firstDatePOSIX$mday)
todayDateISO <- ISOdate(todayDatePOSIX$year + 1900, todayDatePOSIX$mon, todayDatePOSIX$mday)

firstDateISO returns 不适用

todayDateISO returns“2021-08-04 12:00:00 GMT”而不是“2021-09-04 12:00:00 GMT”

我的问题：

如何使用 firstDateISO 获得 "1910-01-01 12:00:00 GMT"？
如何使用 todayDateISO 获得 "2021-09-04 12:00:00 GMT"？

非常感谢任何帮助。

使用的系统：

R版本：4.1.1 (2021-08-10)
RStudio 版本：1.4.1717
OS: macOS 大苏尔版本 11.5.1

Answer 1

使用mon + 1.

with(firstDatePOSIX, ISOdate(year + 1900, mon + 1, mday))
# [1] "1910-01-01 12:00:00 GMT"

with(todayDatePOSIX, ISOdate(year + 1900, mon + 1, mday))
# [1] "2021-09-04 12:00:00 GMT"

ISOdate 转换问题

ISOdate conversion issues

r

isodate