如何在R中导出DataFrame到CSV时避免日期格式变更？

核心原因 #

CSV是纯文本格式，Excel会自动将yyyy-mm-dd格式的列名识别为日期并转换为dd-mm-yyyy，导致显示异常；重新导入R时，因Excel的自动转换，列名/值出现篡改。

针对CSV格式的修复方案 #

1. 给列名添加前缀避免Excel自动识别 #

导出时给所有列名加上非数字前缀（如X），阻止Excel将其识别为日期：

# 导出
write.csv(df, "E:\\df.csv", col.names = paste0("X", colnames(df)))

# 导入时还原列名
mj <- read.csv("E:\\df.csv")
colnames(mj) <- sub("^X", "", colnames(mj))

2. 强制列名以文本格式存储 #

使用write.table替代write.csv，开启列名的引号包裹，让Excel以文本格式读取列名：

write.table(df, "E:\\df.csv", sep = ",", quote = TRUE, col.names = NA, row.names = FALSE)

• quote=TRUE：对列名和字符型值添加引号
• col.names=NA：确保第一行作为列名且被引号包裹

3. Excel端手动导入设置文本格式 #

打开CSV时，通过「数据」→「自文本/CSV」导入，在导入步骤中将列名所在列的格式设置为「文本」，避免自动转换日期。

更可靠的替代文件格式 #

1. Excel原生格式（.xlsx） #

使用openxlsx或writexl包导出，精准保留列名格式，Excel打开无异常：

# 安装包（首次使用）
install.packages("openxlsx")
# 导出
openxlsx::write.xlsx(df, "E:\\df.xlsx", colNames = TRUE)
# 导入
mj <- openxlsx::read.xlsx("E:\\df.xlsx")

2. Feather格式 #

轻量级二进制格式，读写速度快，完美保留数据结构，支持跨语言（R/Python）：

install.packages("feather")
feather::write_feather(df, "E:\\df.feather")
mj <- feather::read_feather("E:\\df.feather")

3. Parquet格式 #

高压缩率，适合大数据场景，保留元数据，支持多语言：

install.packages("arrow")
arrow::write_parquet(df, "E:\\df.parquet")
mj <- arrow::read_parquet("E:\\df.parquet")

内容的提问来源于stack exchange，提问作者hat6ytrs