最优雅的方式加载csv点与R中的千位分隔符

Question

注意：据我所知，这个问题并不重复！ 我找到的所有问题/答案要么是如何从已经在R中的数据中消除点，要么在加载时如何将小数点更改为逗号。

我有一个csv，数字如： 4.123,98 。 问题是因为. 使用read.table ， read.csv或read.csv2加载时，输出变为字符串矩阵。 改变dec ,没有帮助。

我的问题
加载此csv的最优雅方式是什么，以便数字变为例如4123.98作为数字？

Answer 1

改编自这篇文章： 在read.table / read.csv中为colClasses参数指定自定义日期格式

#some sample data
write.csv(data.frame(a=c("1.234,56","1.234,56"),
                     b=c("1.234,56","1.234,56")),
          "test.csv",row.names=FALSE,quote=TRUE)

#define your own numeric class
setClass('myNum')
#define conversion
setAs("character","myNum", function(from) as.numeric(gsub(",","\\.",gsub("\\.","",from))))

#read data with custom colClasses
read_data=read.csv("test.csv",stringsAsFactors=FALSE,colClasses=c("myNum","myNum"))
#let's try whether this is really a numeric
read_data[1,1]*2

#[1] 2469.12

Answer 2

我不是在加载时尝试修复它，而是将数据作为字符串加载到R中，然后将其处理为数字。

所以加载后，它是一列字符串，如“4.123,98”

然后做一些事情：

 number.string <- gsub("\\.", "", number.string)
 number.string <- gsub(",", "\\.", number.string)
 number <- as.numeric(number.string)