R使用mutate新增age_years列报non-numeric Argument to Binary Operator错误

核心原因 #

报错non-numeric argument to binary operator（二元运算符参数非数值）的触发点是代码中的age/12除法操作，说明你数据集中的age列并非数值类型，大概率是字符型或因子型，无法直接参与算术运算。

解决步骤 #

• 第一步：先确认age列的数据类型，运行以下代码查看：

  # 查看age列的类型
  class(linelist$age)
  # 也可以查看整个数据集的字段结构
  str(linelist)
  

  如果输出结果为character（字符型）或factor（因子型），即可确认是类型不匹配问题。
• 第二步：修改代码，先将age转换为数值型再进行计算，修改后的完整代码如下：

  linelist <- linelist %>% 
    # 先转换age为数值型：如果是因子需要先转字符再转数值，避免直接取因子编码值
    mutate(age = as.numeric(as.character(age))) %>%
    mutate(age_years = case_when(
      age_unit == "years"  ~ age,       # 年龄单位为年时直接取原值
      age_unit == "months" ~ age/12,    # 年龄单位为月时除以12转换为年
      is.na(age_unit)      ~ age,       # 年龄单位缺失时默认按年计算
      TRUE                 ~ NA_real_)) # 其他情况赋值为缺失
  

• 第三步：异常值排查（可选）
  如果转换age时出现意料之外的NA，说明原age列存在非数字内容，运行以下代码定位异常行，手动修正即可：

  # 筛选age无法转换为数值的行
  linelist[is.na(as.numeric(as.character(linelist$age))), ]
  

内容的提问来源于stack exchange，提问作者sarah.bourdin