R语言cor()生成相关矩阵报错'x' must be numeric如何解决

报错根因 #

cor()函数仅支持对全数值型数据集计算相关矩阵，你提取的mydata数据集的7列中存在非数值类型（如字符串、因子、日期、逻辑值等）的列，触发该报错。

修复操作步骤 #

• 首先定位非数值列，运行如下诊断代码：

# 输出所有列的数据类型
str(mydata)
# 直接输出每列是否为数值型的判定结果，FALSE对应非数值列
sapply(mydata, is.numeric)

• 按实际场景处理非数值列：
  • 场景1：非数值列是分类、ID类不需要纳入相关计算的字段，直接剔除后计算：

  # 自动筛选所有数值列
  mydata_num <- mydata[, sapply(mydata, is.numeric)]
  # 计算相关矩阵，use参数指定自动跳过含缺失值的行
  corrmax <- cor(mydata_num, use = "complete.obs")
  

  • 场景2：非数值列本身是数值，仅被误存为字符/因子类型，先转换类型再计算：

  # 单列转换示例，假设第3列为误存的因子型数值
  mydata[,3] <- as.numeric(as.character(mydata[,3]))
  # 多列批量转换示例，假设第2、4、6列需要转换
  mydata[,c(2,4,6)] <- lapply(mydata[,c(2,4,6)], function(x) as.numeric(as.character(x)))
  # 转换完成后计算相关矩阵
  corrmax <- cor(mydata, use = "complete.obs")
  

• 额外说明：如果需要纳入有序分类变量计算相关，可改用斯皮尔曼等级相关，指定method参数即可：

corrmax <- cor(mydata_num, method = "spearman", use = "complete.obs")

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