如何对日期对象进行值匹配？直接匹配为何失效？

首先，你遇到的问题核心是日期对象的类型不匹配：你用来匹配的datefiller是POSIXct类型（带时区的日期时间），而待检查的badandgooddates是Date类型（仅日期，无时区）。

为什么%in%失效但==可以？ #

• ==运算符在比较不同类型的日期对象时，会自动做隐式类型转换：R会把Date对象转换成POSIXct（因为后者是更精确的时间类型），如果转换后的时间值和datefiller一致，就会返回TRUE。
• 而%in%底层依赖match()函数，它会严格检查对象类型，只有当两个对象的类型完全相同时才会进行值匹配。所以Date和POSIXct类型的对象直接用%in%会返回FALSE。

无需转换为字符/数值的可靠匹配方法 #

你完全不需要通过as.character()或as.numeric()间接匹配，只需要保证两边的日期类型一致即可：

方法1：将POSIXct转换为Date类型

把你的占位日期转换成和待检查列一致的Date类型，这样%in%就能正常工作：

# 转换占位日期为Date类型
datefiller_date <- as.Date(datefiller)

# 重新运行你的代码
tibble(badandgooddates = c(as.Date('1899-12-30'), as.Date('1900-01-01'), Sys.Date(), as.Date('1776-07-04'))) %>%
  mutate(isbad = badandgooddates %in% datefiller_date)

运行后会得到预期结果：前两行isbad为TRUE，后两行为FALSE。

方法2：将Date转换为POSIXct类型

如果需要保留POSIXct的时区信息，可以把待检查的Date列转换成同时区的POSIXct：

tibble(badandgooddates = c(as.Date('1899-12-30'), as.Date('1900-01-01'), Sys.Date(), as.Date('1776-07-04'))) %>%
  mutate(isbad = as.POSIXct(badandgooddates, tz = 'MST') %in% datefiller)

这个方法也能得到正确的匹配结果。

方法3：直接比较底层数值（不推荐，可读性差）

日期对象在R中本质是数值：Date是自1970-01-01以来的天数，POSIXct是自1970-01-01以来的秒数。你可以统一单位后匹配：

tibble(badandgooddates = c(as.Date('1899-12-30'), as.Date('1900-01-01'), Sys.Date(), as.Date('1776-07-04'))) %>%
  mutate(isbad = as.numeric(badandgooddates) %in% as.numeric(datefiller)/86400)

不过这种方法可读性差，除非特殊场景，否则优先用前两种类型转换的方法。

总结 #

最可靠且直观的方法是统一日期对象的类型，要么都转成Date，要么都转成同时区的POSIXct，这样%in%就能正常完成值匹配，完全不需要转换成字符或数值类型。

内容的提问来源于stack exchange，提问作者Gabi