如何将字符类型的货币值转换为数值类型？

问题原因 #

你的VALOR列是巴西地区的货币字符串格式：用.作为千位分隔符，,作为小数点。而R默认识别的数值格式是.做小数点、,做千位分隔符，直接用as.numeric()转换会因格式不匹配生成NA。

解决方案 #

方法1：Base R 字符串替换 #

通过两次替换统一格式后再转数值：

1. 先去掉所有千位分隔符.
2. 把小数点,替换为.
3. 转换为数值类型

代码示例：

gastosbolsonaro <- gastosbolsonaro %>% 
  mutate(VALOR = as.numeric(gsub(",", ".", gsub("\\.", "", VALOR))))

方法2：使用readr包的本地化解析 #

readr包的parse_number()函数支持指定本地化格式，直接适配你的数据：

先安装并加载readr包：

install.packages("readr")
library(readr)

然后执行转换：

gastosbolsonaro <- gastosbolsonaro %>% 
  mutate(VALOR = parse_number(VALOR, locale = locale(decimal_mark = ",", grouping_mark = ".")))

这个方法更简洁，无需手动处理字符串替换，适合批量处理本地化格式的数值。

验证示例 #

测试单个值确认转换结果：

# Base R方法测试
as.numeric(gsub(",", ".", gsub("\\.", "", "3.554,34"))) # 输出3554.34

# readr方法测试
parse_number("56,34", locale = locale(decimal_mark = ",", grouping_mark = ".")) # 输出56.34

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