强制 write.csv 包含数字数据类型的小数点

Question

在写入 csv 时，有没有办法在数字数据类型的值中包含小数，甚至是整数？

f <- tempfile("d", fileext = ".csv")
write.csv(data.frame(x = as.numeric(c(1,2,3.3,4))), f, row.names = FALSE)
readLines(f)
#> [1] "\"x\"" "1"     "2"     "3.3"   "4"
unlink(f)

上面的输出应该如下所示：

#> [1] "\"x\"" "1.0"     "2.0"     "3.3"   "4.0"

Answer 1

来自

write_csv2

的

readr

做你期望的。请记住，它使用小数点

,

而不是

.

所以用例如读取数据

read.csv2

.

library(readr)

write_csv2(data.frame(x = c(1, 2, 3.3, 4)), file = "file")

readLines("file")
[1] "x"   "1,0" "2,0" "3,3" "4,0"

read.csv2("file")
    x
1 1.0
2 2.0
3 3.3
4 4.0