R语言中批量转换数据框字符型列为数值型的解决方案

原代码失效的核心原因：as.numeric() 仅支持原子向量作为输入，而 df[,1:18] 返回的是包含18列的子集数据框——尤其是你用的是tibble类型（tbl_df），[,] 索引默认不会降维成向量，直接对多列数据框调用 as.numeric() 无法完成逐列的类型转换。

方案1：dplyr 批量转换（适配tibble场景，代码最简洁） #

如果你使用tidyverse生态处理数据，直接用across对所有列批量应用转换函数即可：

library(dplyr)
df <- df %>%
  mutate(across(.cols = everything(), .fns = as.numeric))

如果需要固定转换的列范围，把everything()替换为1:18或者对应列名的选择语句即可。

方案2：基础R实现，不需要加载额外包 #

写法1：lapply逐列转换（最稳妥） #

对选中的18列逐列调用as.numeric，转换结果直接赋值回原数据框对应位置：

df[, 1:18] <- lapply(df[, 1:18], as.numeric)

写法2：统一转矩阵后还原（仅适用于全列都是待转数值的场景） #

你的数据集所有列都是存储数值的字符型，类型完全统一，可以先转成数值型矩阵再转回数据框格式：

# 普通data.frame格式
df <- as.data.frame(sapply(df, as.numeric))
# 如果需要保留原tibble格式，追加以下代码
df <- tibble::as_tibble(df)

转换完成后运行以下命令查看列类型，确认所有列已转为numeric（数值型）即可：

str(df)

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