string - write.csv からの出力のヘッダーを囲む引用符を削除します

Question

次のような2 x 2がありcsvます。

A,B
1.12,1.24

R何もせずに古いファイルを読み込んで上書きすると、ターミナルに次のように出力されます。

"A","B"
1.12,1.24

これが発生しないようにするにはどうすればよいですか? Rコード:

dat <- read.csv(filePath,header=FALSE,sep=",",skip=1)
colNames <- strsplit(readLines(filePath,1),",")[[1]]
colnames(dat) <- colNames
write.csv(dat,filePath,row.names=FALSE)

上記datの MWE はdata.frame.