R中的列名插入错误

我正在尝试使用下面的代码将列名插入到R代码中，并在运行实际代码时不断收到此错误： 匹配中出错。名称（类别、名称（xi））： 名称与以前的名称不匹配

有人知道如何解决这个问题吗？我已经查阅了其他有关堆栈溢出的文章，了解如何解决此问题，但是没有人在代码中的何处发布解决方案，因此我无法正确修复代码。注意：我遗漏了目录信息，所以请只关注代码的实际内容。谢谢

  for (fle in i.want.these.files){

#read in file to parse
mydata <- read.table(paste(my.in.dir,fle,sep = '/'), sep="|", allowEscapes = 
TRUE, fill = FALSE, stringsAsFactors = F, quote = "")


mydata[,1] <- gsub(" ", "", mydata[,1])
empty_rows <- which(nchar(mydata[,1]) == 0)
non_empty_rows <- which(nchar(mydata[,1]) != 0)

mydata2 <- NULL
for (i in 2:length(non_empty_rows)) {

var <- mydata[non_empty_rows[i],12]

for (n in (non_empty_rows[i]+1):(min(non_empty_rows[i+1]-1, 
max(non_empty_rows), na.rm =T))) {

  var <- paste0(var, mydata[n, 12])

}

mydata2 <- rbind(mydata2,
                 cbind(mydata[non_empty_rows[i], 1:11], var))

colnames(mydata2) <- c("A","B","C","D","E","F","G","H","I","J","K","L")


}

write.table(mydata2, file=paste(my.out.dir,"rolled_message_test1.csv", 
sep="/"), sep=",",  col.names = FALSE, row.names = FALSE)

}

for（i.want.this.files中的fle）{
#读入要分析的文件
mydata代码中哪里有错误？如果您设置
fle，我只是自己解决了这个问题。write.table函数应该是这样的：write.table（mydata2，file=paste（my.out.dir，“rolled_message_test1.csv”，sep=“/”，sep=“”，col.names=c（“A”，“B”，“c”，“D”，“E”，“F”，“G”，“H”，“I”，“J”，“K”，“L”，row.names=FALSE）您当然不需要执行
colnames（mydata2）操作，代码中哪里会出现错误？如果设置
fle，我就自己解决了这个问题。write.table函数应该是这样的：write.table（mydata2，file=paste（my.out.dir，“rolled_message_test1.csv”，sep=“/”，sep=“，”，col.names=c（“A”，“B”，“c”，“D”，“E”，“F”，“G”，“H”，“I”，“J”，“K”，“L”，row.names=FALSE）您当然不需要执行
colnames（mydata2）