为何取整POSIXct对象后会丧失与等价POSIXct的匹配能力？

问题核心 #

你遇到的现象是：对整点POSIXct时间执行round()取整后，虽然time == roundtime返回TRUE，但match()和%in%却无法匹配，本质是两种比较逻辑的差异。

原因说明 #

• ==比较POSIXct对象时，仅校验底层的时间戳数值（从1970-01-01 UTC开始的秒数）和时区，忽略其他附加属性。
• match()和%in%判断相等时，会调用identical()函数，这会检查对象的所有属性——而round.POSIXt执行后会给返回的时间对象新增一个digits属性，导致原本数值相同的时间因属性不一致被判定为不相等。

验证步骤 #

你可以通过以下代码确认属性差异：

# 查看两个对象的属性
attributes(time)
attributes(roundtime)

# 用identical验证是否完全一致
identical(time[1], roundtime[1]) # 返回 FALSE

解决方法 #

方法1：移除roundtime的digits属性

直接删除新增的digits属性，让两个对象的属性结构一致：

attr(roundtime, "digits") <- NULL

# 再次测试匹配
time %in% roundtime # 返回 TRUE
match(time, roundtime) # 正常返回匹配索引

方法2：转为数值型匹配

跳过POSIXct对象的属性校验，直接比较底层的时间戳数值：

match(as.numeric(time), as.numeric(roundtime))
match(as.numeric(roundtime), as.numeric(datetime))

方法3：改用trunc取整

如果你的需求是取整到整点而非四舍五入，可使用trunc()，它不会新增digits属性：

roundtime <- trunc(time, units = "hours")
time %in% roundtime # 直接返回 TRUE

内容的提问来源于stack exchange，提问作者W. Kessler