R中对全空列使用case_when()函数报错如何解决

核心触发逻辑来自R的空值默认类型规则，以及dplyr::case_when()的强类型校验要求：

• R中没有显式指定类型的全空列，会被默认解析为逻辑型（logical）列，存储的空值是逻辑型NA；只要列内存在一个非空数值，整列会自动转换为数值型（numeric），空值对应为数值型NA_real_。
• case_when()要求所有条件分支的右侧返回值必须为完全一致的类型，否则直接抛出类型错误：
  • 当temperature列存在非空值时，整列为numeric类型，三个分支（直接返回温度值、华氏度转摄氏度、开尔文转摄氏度）的输出均为numeric类型，类型匹配，代码可正常运行。
  • 当temperature列全为空时，整列为logical类型：匹配C单位的分支直接返回logical型的原值，匹配F、K单位的分支对空值做算术运算时会自动输出numeric类型结果，分支间输出类型不统一，直接触发报错。

可以用几行简单代码复现这个类型冲突：

# 构造全空的温度列，和读入全空列时的默认类型一致
temp <- rep(NA, 4)
class(temp) # 输出 [1] "logical"
class(temp - 32) # 算术运算后自动转类型，输出 [1] "numeric"

最通用的修复方式是在执行单位转换前，显式将temperature列转换为numeric类型，从根源消除类型错配，无论列内是否存在非空值都可稳定运行：

data <- data %>%
  # 提前显式转数值型，避免全空列被识别为逻辑型
  mutate(temperature = as.numeric(temperature)) %>%
  mutate(temperature = case_when(
    unit == 'C' ~ temperature, 
    unit == 'F' ~ (temperature - 32) * (5/9),
    unit == 'K' ~ temperature - 273, # 注：开尔文转摄氏度的精确换算常数为273.15，可按需调整精度
    # 可选：增加兜底分支，处理unit取值不在C/F/K范围内的异常情况
    TRUE ~ NA_real_
  ))

如果你是批量处理多个列结构一致的数据框，建议在数据读入环节就通过读入函数的列类型参数（比如readr::read_csv的col_types参数），明确指定temperature列为numeric类型、unit列为character类型，从读入阶段就避免全空列自动解析为逻辑型的问题，后续所有批量处理步骤都不会再出现同类报错。

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