如何在保留格式的前提下将CSV中的逗号小数点转为点小数点？

问题说明 #

导入CSV文件时遇到矛盾：文件同时用逗号作为列分隔符和数值的小数点标记。直接用read.csv读取后，用gsub(",", ".", data)会把列分隔符也替换掉，导致所有内容合并为一列；尝试将CSV导出为分号、制表符等其他分隔符格式后，读取时却报错：

Error in read.table(file = file, header = header, sep = sep, quote = quote,  : 
  more columns than column names

附CSV数据样例：

Date & Time,Temp(C),Depth(m),Salinity(psu),Conduct(mS/cm),Sound Velocity(m/sec)
"44843,96458","19,01","-0,43","0,01",0,"1478,63"
"44843,96493","17,7","-0,54","0,01",0,"1474,38"
"44843,96528","16,65","-0,54","0,01",0,"1470,88"

解决方案 #

1. 直接正确读取原CSV（保留列分隔符，自动转换小数点） #

无需修改原文件，读取时通过参数指定小数点标记为逗号，R会自动识别引号包裹的字段内的逗号为小数点，同时保留列分隔的逗号：

# 读取文件，指定列分隔符为逗号，小数点标记为逗号
data <- read.csv("D:\\My\\data\\pathway", sep = ",", dec = ",")

读取完成后，所有数值列会自动转为数值类型，小数点已替换为点，无需额外处理。

2. 使用其他分隔符导入CSV #

若需用分号、制表符等分隔符，需确保电子表格导出时正确配置分隔符并保留字段引号（例如Excel中选择“CSV（分号分隔）”），再用对应参数读取：

• 分号分隔的CSV：

# 方法1：手动指定参数
data <- read.csv("D:\\My\\data\\pathway_semicolon.csv", sep = ";", dec = ",")
# 方法2：使用read.csv2（默认sep为;，dec为,）
data <- read.csv2("D:\\My\\data\\pathway_semicolon.csv")

• 制表符分隔的CSV：

data <- read.delim("D:\\My\\data\\pathway_tab.csv", dec = ",")

修复临时方法的转换错误 #

你当前将矩阵转数据框后转数值时出现Error: 'list' object cannot be coerced to type 'double'，是因为直接对数据框列（list类型）使用as.numeric导致的。可通过批量转换列的方式修复：

# 将矩阵转为数据框
mx_df <- as.data.frame(mx_point)
# 批量转换数值列（跳过第一列日期，或根据实际情况调整）
mx_df[-1] <- lapply(mx_df[-1], as.numeric)
# 若第一列也需转为数值（如Excel日期序列号）
mx_df <- lapply(mx_df, as.numeric) %>% as.data.frame()

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