【发布时间】:2021-12-12 04:26:52
【问题描述】:
我想在我的 data.table 顶部添加一行,同时将其导出到 csv!
library(data.table)
cat("Source Date: 01/01/2020\n", file = "dt.csv")
dt <- data.table(a = 1:5)
fwrite(dt, "dt.csv", append =TRUE)
【问题讨论】:
标签: data.table
我想在我的 data.table 顶部添加一行,同时将其导出到 csv!
library(data.table)
cat("Source Date: 01/01/2020\n", file = "dt.csv")
dt <- data.table(a = 1:5)
fwrite(dt, "dt.csv", append =TRUE)
【问题讨论】:
标签: data.table
我不确定我是否正确理解了您的问题。但是在 fwrite 函数中添加 col.names=TRUE :
library(data.table)
cat("Source Date: 01/01/2020\n", file = "dt.csv")
dt = data.table(a = 1:5)
fwrite(dt, "dt.csv", append = TRUE, col.names = TRUE)
如果您想阅读此文件,您需要跳过第一个“源日期...”行:
> fread("dt.csv", skip = 1, header=TRUE)
a
1: 1
2: 2
3: 3
4: 4
5: 5
【讨论】: