r - lubridate 的奇怪行为：将特定天数添加到特定日期会产生 NA

Question

我习惯于lubridate对日期执行多项操作，并且在某些时候我需要添加 6 天到我正在使用的日期。我在一个循环中这样做，它几乎适用于每个日期，但在这个特定的日期上，总和返回NA

library(lubridate)
testDate <- ymd("2018-10-29", tz = "America/Sao_Paulo")

testDate + days(4) #OK
testDate + days(5) #OK
testDate + days(6) #Returns NA
testDate + days(7) #OK
testDate + days(8) #OK
testDate + days(9) #OK

有人可以帮我理解为什么会这样吗？

会话信息：

R version 3.6.0 (2019-04-26)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 10 x64 (build 17763)

Matrix products: default

locale:
[1] LC_COLLATE=English_United States.1252  LC_CTYPE=English_United States.1252    LC_MONETARY=English_United States.1252
[4] LC_NUMERIC=C                           LC_TIME=English_United States.1252    

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] lubridate_1.7.4

loaded via a namespace (and not attached):
[1] compiler_3.6.0 magrittr_1.5   tools_3.6.0    Rcpp_1.0.3     stringi_1.4.3  stringr_1.4.0 

标签： rlubridate

Answer 1

正如@akrun 建议的那样，这是夏令时的问题。看看之前和之后的日子6：

format(testDate + days(c(5,7)), format = "%Y-%m-%d %H:%M:%S")
# [1] "2018-11-03 00:00:00" "2018-11-05 00:00:00"

您会注意到它假定为“午夜”（正如人们所期望的那样）。

在 2018 年的巴西圣保罗，它在 4 日午夜（参考）午夜前滚：

当当地标准时间即将到达 2018 年 11 月 4 日星期日时，午夜12:00:00时钟被调快1 小时至 2018 年 11 月 4 日星期日凌晨 1:00:00当地时间。

这意味着 11 月 3 日 23:59:59 是存在的，但它一往前一秒，就变成了 11 月 4 日 01:00:00。这表明（数学上） Nov 3, 00:00:00 从未存在过。

因此，R 会通过返回来告诉您该时间戳不是合法时间NA。

Date但是，您可以很容易地处理对象：

testDate + days(5:7)
# [1] "2018-11-03 -03" NA               "2018-11-05 -02"

as.Date(testDate) + days(5:7)
# [1] "2018-11-03" "2018-11-04" "2018-11-05"