如何使用 R Z19B13BE0F334E065AB057ZB23 將格式錯誤的 header 行寫入 csv？

Question

我有以下 *csv 文件，其中包含三個“標題”字段，其格式與 csv 文件example.csv不同：

# Filename is addresses.csv
# Location of file from https://people.sc.fsu.edu/~jburkardt/data/csv/csv.html
# The data isn't authentic
John,Doe,120 jefferson st.,Riverside, NJ, 08075
Jack,McGinnis,220 hobo Av.,Phila, PA,09119
"John ""Da Man""",Repici,120 Jefferson St.,Riverside, NJ,08075
Stephen,Tyler,"7452 Terrace ""At the Plaza"" road",SomeTown,SD, 91234
,Blankman,,SomeTown, SD, 00298
"Joan ""the bone"", Anne",Jet,"9th, at Terrace plc",Desert City,CO,00123

通常，我會使用 R data.table 讀取文件，跳過初始行。

library(data.table)
dt = fread('addresses.csv', skip=3)
## do something

在分析/操作數據后，我通常將文件編寫如下：

fwrite(dt, "result.csv", col.names=FALSE)

問題在於，我已經刪除了原來的 header 行。

是否有讀取原始 header 行並將它們附加到最終結果以通過fwrite()寫入的標准方法？ 我認為如果我在使用fwrite()之前將 append 這些 header 行到dt會出現解析錯誤

編輯：注意我希望保留 header 行，即

# Filename is addresses.csv
# Location of file from https://people.sc.fsu.edu/~jburkardt/data/csv/csv.html
# The data isn't authentic

Answer 1

您可以首先使用write(header_lines, filename)從原始文件中寫入聽者行，然后使用帶有選項append=T的fwrite命令。