dplyr交叉连接0行数据框触发Corrupt POSIXct错误的排查方案

这是dplyr 1.0.9版本关联依赖的边界场景bug，和业务逻辑无关：

• 用by = character()实现交叉连接是dplyr官方支持的写法，问题出在旧版本vctrs包的POSIXct类型校验逻辑：当连接的其中一个表是0行且携带POSIXct列时，类型拼接环节会错误将0长度POSIXct列的底层类型识别为logical，触发rlang底层的类型合法性检查报错。
• 从报错栈可以看到，错误发生在tibble转换、vctrs类型校验阶段，还没走到实际的连接计算逻辑，属于典型的边界case漏判。

按优先级从高到低选择即可：

1. 升级依赖（最推荐）
   该bug已经在后续版本的vctrs、dplyr中修复，直接升级相关包到CRAN最新稳定版即可，原代码不需要做任何修改：

   install.packages(c("dplyr", "vctrs", "tibble", "rlang"))
   

   升级后运行原代码会直接返回符合预期的0行结果，所有列的类型、POSIXct时区属性都会完整保留。

2. 不升级包的临时规避
   如果受环境限制不能升级包，选下面任意一种写法都能绕开bug：

   • 用虚拟连接键实现交叉连接，绕开by=character()的特殊处理逻辑：

     lap_data %>%
       mutate(.join_dummy = 1L) %>%
       inner_join(
         start_shifted %>% mutate(.join_dummy = 1L),
         by = ".join_dummy"
       ) %>%
       select(-.join_dummy)
     

     该写法和by=character()的交叉连接逻辑完全等价，返回结果和正常逻辑无差异。
   • 连接前显式重置0行表的POSIXct列类型，修复错误的底层类型标记：

     # 未安装lubridate可直接把第一行参数替换为c(timestamp_start, timestamp_stop)
     start_shifted_fixed <- start_shifted %>%
       mutate(across(where(lubridate::is.POSIXct), ~as.POSIXct(., tz = attr(., "tzone"))))
     
     lap_data %>% inner_join(start_shifted_fixed, by = character())
     

3. 性能兜底写法
   交叉连接只要任意一个输入表是0行，结果必然是0行，这种场景可以直接跳过join逻辑构造结果，性能更高也不会触发bug：

   cross_join <- function(x, y) {
     if (nrow(x) == 0 || nrow(y) == 0) {
       return(bind_cols(x[0, ], y[0, ]))
     }
     inner_join(x, y, by = character())
   }
   
   # 直接调用即可
   cross_join(lap_data, start_shifted)
   

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