R语言字符转numeric时负数变为NA的问题求助

这种情况大概率是你的字符型列里的负号不是标准半角负号（-），或是藏了空格、非打印字符，导致as.numeric()识别失败。下面是几个实用的解决办法：

• 检查并替换非标准负号
  很多时候负数用的是全角负号（－），肉眼很难区分。先排查：

  # 检查是否存在全角负号
  any(grepl("－", your_data$target_column))
  

  要是结果为TRUE，就替换成半角负号再转换：

  your_data$numeric_col <- as.numeric(gsub("－", "-", your_data$target_column))
  

• 清理隐藏空格与非打印字符
  列里可能有前后空格或看不见的特殊字符，先清理再转换：

  # 去掉前后空格
  your_data$numeric_col <- as.numeric(trimws(your_data$target_column))
  
  # 仅保留数字、半角负号和小数点，移除其他杂项
  your_data$numeric_col <- as.numeric(stringr::str_remove_all(your_data$target_column, "[^0-9.-]"))
  

• 用更智能的解析函数
  readr包的parse_number()能自动处理各种非标准格式，包括全角符号、空格：

  library(readr)
  your_data$numeric_col <- parse_number(your_data$target_column)
  

举个实际例子：
假设你的数据是这样的：

df <- data.frame(raw_num = c("123", "－456", " 789 ", "10.11", "abc123-45"))

用parse_number直接转换：

df$clean_num <- parse_number(df$raw_num)
# 结果会是 123, -456, 789, 10.11, -45，完美识别负数

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