將R數據框導出為CSV - 如何引用包含數字列的所有列？

Question

我需要編寫一個包含引用的所有列的CSV

write.table(param, file=outputFile, row.names=FALSE, col.names=TRUE, sep=",", dec=".", quote=TRUE)

寫這個：

"maxit","size","decay","resulado","filename"
"1",10000,6,5e-05,0,996363636363636,"result-1.csv"

dec =“。” 仍然用小數點寫逗號。

我需要的：

"maxit","size","decay","resulado","filename"
"1","10000","6","5e-05","0.996363636363636","result-1.csv"

一些提示？

謝謝。

Answer 1

來自？write.table：

如果由'quote'指定，則僅引用已轉換為字符的列。

因此，您可以事先轉換為字符，然后寫入文件。 此外，由於您要編寫CSV，而不是使用write.table並分別對每個參數混亂，您可以使用使用dec="." write.csv dec="." 和sep=","默認情況下。 例如，如果您的數據框是DF：

DF[] <- lapply(DF, as.character)
write.csv(DF, "foo.csv")

Answer 2

您可以撥打write.table()的調用的結果函數來format()

write.table(format(df))

這會將所有列轉換為字符向量，還可以控制格式化的完成方式。

> sapply(format(mtcars), mode)
        mpg         cyl        disp          hp        drat          wt        qsec          vs          am        gear        carb 
"character" "character" "character" "character" "character" "character" "character" "character" "character" "character" "character"