R语言中如何将带逗号的字符型数值转换为double类型？

问题原因 #

as.double()默认遵循英文区域设置，仅识别.作为小数点分隔符。当遇到以,作为小数点的字符串（比如"1,8"）时，它无法将其解析为有效数值，因此返回NA。

解决方法 #

• 方法1：基础R替换转换
  先用gsub()把字符串中的逗号替换为小数点，再用as.double()转换：

  # 单个值转换
  x <- "1,8"
  as.double(gsub(",", ".", x))
  
  # 数据框列转换
  df$target_col <- as.double(gsub(",", ".", df$target_col))
  

• 方法2：使用readr包指定区域解析
  readr包的parse_double()支持通过locale参数自定义小数点分隔符，适合批量处理：

  library(readr)
  
  # 单个值转换
  x <- "1,8"
  parse_double(x, locale = locale(decimal_mark = ","))
  
  # 数据框列转换
  df$target_col <- parse_double(df$target_col, locale = locale(decimal_mark = ","))
  

• 方法3：stringr包替换转换
  如果你习惯使用stringr包的字符串操作函数，也可以用str_replace()完成替换后转换：

  library(stringr)
  
  # 单个值转换
  x <- "1,8"
  as.double(str_replace(x, ",", "."))
  
  # 数据框列转换
  df$target_col <- as.double(str_replace(df$target_col, ",", "."))
  

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