read_csv2（）和使用locale（）参数将点小数导入为数字

Question

使用read_csv2（）我尝试导入数据（csv格式和分隔符），并自动检测 十进制数。

到目前为止，我一直没有成功，并不断得到以下输出（可以看到最后一列是

# A tibble: 46 x 4
             id     segment_id             value_type             value
          <int>          <int>                  <chr>             <chr>
1             1              1                    min                 0
2             1              1                    max               0.2
3             1              2                    min                 0
4             1              2                    max               0.2
...

我所尝试的：

1.

read_csv2("table.csv", col_types = cols())

2.我读了readr，发现了locale（），如下所述

语言环境控制因地而异的默认值。默认语言环境是以美国为中心的（如R），但您可以使用locale（）创建自己的语言环境，控制默认时区、编码、小数标记、大标记和日/月名称等内容。

然而，使用下面的代码，我并没有解决我的问题：

read_csv2("table.csv", col_types = cols(), col_names = TRUE, locale(decimal_mark = "."))

3.在阅读了如何使R的read\u csv2（）正确识别文本字符后，我尝试了File\Save with Encoding中列出的所有编码。。。RStudio的无效：

read_csv2("table.csv", col_types = cols(), col_names = TRUE, locale(encoding = "ISO-8859-1"))

列出的编码有：ISO-8859-1、ASCII、BIG5、GB18030、GB2312、ISO-2022-JP、ISO-2022-KR、ISO-8859-2、ISO-8859-7、SHIFT-JIS、UTF-8、WINDOWS-1252




Answer 1

当我用你的4行作为csv运行read_csv2并运行这些行时：

prueba <- read_csv2(file = input_prueba, col_types = cols(), col_names = TRUE, locale(encoding = "ISO-8859-1"))

我得到了相同的输出，最后一列作为字符列导入，但带有一条消息，建议使用read\u delim（）：

使用'，'作为十进制，'.'作为分组标记。使用read_delim（）进行更多控制

如果您仍然想使用read\u csv2，以下是我的方法：

#For a quicker management of tables use data.table
install.packages("data.table")
library("data.table")

prueba <- as.data.table(prueba)

#Change column to number
prueba[,value:=as.double(value)]
str(prueba)
Classes ‘data.table’ and 'data.frame':  4 obs. of  4 variables:
 $ id        : int  1 1 1 1
 $ segment_id: int  1 1 2 2
 $ value_type: chr  "min" "max" "min" "max"
 $ value     : num  0 0.2 0 0.2