ISOdate转换问题

Question

我正在尝试用ISOdate函数转换日期，但我面临两个问题：

• 将1970年之前的日期转换为安娜；
• 将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返回NA

todayDateISO返回"2021-08-04 12:00格林尼治时间“而不是"2021-09-04 12:00格林尼治时间”。

我的问题：

如何用firstDateISO

• What获得"1910-01-01 12:00:00 GMT"，用todayDateISO

获取"2021-09-04 12:00:00 GMT"

任何帮助都很感激。

所使用的系统：

(2021-08-10)

• RStudio版本: 1.4.1717

• OS: macOS Big Sur版本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"