R导入和导出csv文件(Excel)

x759pob2 于 2023-04-18 发布在其他

关注(0)|答案(1)|浏览(153)

这可能是一个菜鸟问题，但我有一个问题，导出和导入CSV。
我导出包含值的CSV（即300425.25）。当我在Excel中打开它时，它都是逗号分隔的，正如预期的那样。当我点击“数据到列”时，我每次都将值更改为300425，25（我已经尝试了所有不同的组合小数分隔符在高级）。这是优秀的工作与Excel，但导入到R我坚持与逗号前的小数，这反过来又不能用我的R代码的其余部分。
我从来没有在导出.CSV时遇到过这个问题，直到我最近清理了我的电脑并重新安装了一个。我怀疑它可能是在R Studio设置或Excel中。
有人能帮帮我吗？
先谢谢你了。

来源：https://stackoverflow.com/questions/23481924/r-importing-and-exporting-csv-files-excel

1条答案

按热度按时间

pxq42qpu1#

我已经能够用下面的代码做到这一点。这种方法只适用于Windows。

library(RDCOMClient)

y <- rnorm(2)
x <- rnorm(2)
df <- data.frame(y, x)
write.table(df, file = "D:\\test_File_1.csv",
            row.names = FALSE, col.names = FALSE, sep = ",")

path_CSV_File1 <- "D:\\test_File_1.csv"

xlApp <- COMCreate("Excel.Application")
xlApp[["Visible"]] <- TRUE
xlApp[["UseSystemSeparators"]] <- FALSE 
xlApp[["DecimalSeparator"]] <- "."
xlWbk <- xlApp$Workbooks()$Open(path_CSV_File1)
Sheets <- xlWbk$Sheets()

rngAll <- Sheets[[1]]$Range("A1:A2")
rngAll$TextToColumns(DataType = 1, Comma = TRUE, DecimalSeparator = ".", TextQualifier = -4142)

xlWbk$SaveAs("D:\\test_File_1_Mod.csv")
xlWbk$Close()

文件test_File_1.csv的内容为

2.5392366197081,0.78545887144188
-0.623517357751695,0.205786046412415

文件test_File_1_Mod.csv的内容为

2.53923662;0.785458871
-0.623517358;0.205786046

赞(0）回复(0）举报 2023-04-18

我来回答

R导入和导出csv文件(Excel)

1条答案

相关问题

热门标签

最新问答