R 为什么舍入POSIXct会更改能力以匹配等效的POSIXct

这个答案扩展了我对OP最初问题的 comments .

该问题似乎归因于使用round导致的静默类更改:

class(time)
[1] "POSIXct" "POSIXt" 
class(datetime)
[1] "POSIXct" "POSIXt" 

但

class(roundtime)
[1] "POSIXlt" "POSIXt"

类更改在没有警告或注释的情况下执行，并且被默认的S3 print方法隐藏:

print(datetime[1])
[1] "2020-01-01 15:00:00 UTC"
print(time[1])
[1] "2020-01-01 15:00:00 UTC"
print(roundtime[1])
[1] "2020-01-01 15:00:00 UTC"

然而，当对象为unclass%时，这一点很明显:

print(unclass(datetime[1]))
[1] 1577890800
attr(,"tzone")
[1] "UTC"
print(unclass(time[1]))
[1] 1577890800
attr(,"tzone")
[1] "UTC"
print(unclass(roundtime[1]))
$sec
[1] 0

$min
[1] 0

$hour
[1] 15

$mday
[1] 1

$mon
[1] 0

$year
[1] 120

$wday
[1] 3

$yday
[1] 0

$isdst
[1] 0

attr(,"tzone")
[1] "UTC"

match看起来是失败的(尽管它实际上工作正常)，因为正如其在线文档中所清楚的那样，"因子、原始向量和列表被转换为字符向量，内部分类的对象通过mtfrm被转换，然后在匹配之前，x和table被强制为公共类型(在R的排序中，两种类型中的后一种，逻辑和数字；复杂和字符).……在某种程度上，什么与什么匹配是一个定义问题".

这个问题可以通过使用lubridate来避免(而且，作为一个额外的好处，我认为相关的函数名使程序员的意图更加透明):

library(lubridate)
roundtime1 <- floor_date(datetime, "hour")
class(roundtime1)
[1] "POSIXct" "POSIXt" 
match(time, roundtime1)
[1] 1 2 7
match(roundtime1, datetime)
 [1]  1  2  3  4  5  6  7  8  9 10 11 

正如@r2evans所写的，这是一个沉默的、令人讨厌的、令人费解的trap (虽然有文档记录，但很容易修复)可能会导致难以识别和避免的意外行为.