r - 困惑在 R 中创建 xlsx 文件

Question

我正在尝试读取一个 txt 文件并从中创建一个 xlsx。这是我的代码。

setwd("~/Downloads/Test")
FILES <- list.files( pattern = ".txt")
library(openxlsx)
for (i in 1:length(FILES)) {
  FILE=read.delim(FILES[i],header=F,stringsAsFactors=FALSE,sep = "\t",, quote = "")
  colnames(FILE) <- c("A","B","C","D","E","F")
  write.csv(FILE,file="Dummy.xls")
}

当我运行这段代码时，我可以创建一个带有xls扩展名的 Excel 文件，但是当我尝试对 执行相同操作时xlsx，通过更改file="Dummy.xlsx"，文件正在创建，但是当我打开它时，我得到以下错误。

请让我知道我哪里出错了，我该如何解决这个问题。

谢谢