使用ggplot绘制箱线图时，因子转数值出现NAs introduced by coercion问题

出现这个错误，说明你的length factor里包含无法直接转换为数字的字符值（比如空格、字母、单位、"NA"字符串等）。按以下步骤排查和解决：

1. 定位问题值 #

先找出哪些原factor值导致了转换失败：

# 筛选转换后为NA的原factor值
bad_vals <- um2$length[is.na(as.numeric(as.character(um2$length)))]
# 查看唯一的问题值
unique(bad_vals)

运行后就能看到具体是哪些字符阻碍了转换，比如"15.2cm"、" 20 "、"NA"这类。

2. 根据问题类型处理 #

情况1：包含非数字字符（如单位、字母） #

用正则表达式提取字符串中的数字部分：

# 提取0-9和小数点，忽略其他字符（如果有负数，把"-"加入正则："[^0-9.-]"）
um2$length1 <- as.numeric(gsub("[^0-9.]", "", as.character(um2$length)))

情况2：包含空白字符（空格、制表符） #

先去除前后空白再转换：

# 清理空白
length_clean <- trimws(as.character(um2$length))
# 转换为数值
um2$length1 <- as.numeric(length_clean)

情况3：存在字符型"NA" #

如果factor里有字符串"NA"（不是真正的缺失值），先替换为NA再转换：

length_char <- as.character(um2$length)
# 将字符"NA"转为缺失值NA
length_char[length_char == "NA"] <- NA
um2$length1 <- as.numeric(length_char)

情况4：混合多种问题 #

可以组合上述方法，比如先清空白再提取数字：

um2$length1 <- as.numeric(gsub("[^0-9.]", "", trimws(as.character(um2$length))))

更简便的方法：用readr包的parse_number #

parse_number能自动处理多数常见的非数字干扰（单位、空白等）：

# 先安装包（首次使用）
# install.packages("readr")
library(readr)
um2$length1 <- parse_number(as.character(um2$length))

3. 验证转换结果 #

转换后检查结果是否符合预期：

# 统计转换后NA的数量
sum(is.na(um2$length1))
# 查看前10行原数据和转换后的数据对比
cbind(original = um2$length, converted = um2$length1)[1:10, ]

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