即使文件已打开，如何将csv文件写入文件夹[R]

我正在使用

write.table（）

函数将csv文件写入文件夹。打开文件后，当我再次尝试将文件写入文件夹时，会出现此错误

 Error in file(file, ifelse(append, "a", "w")) : 
  cannot open the connection
In addition: Warning message:
In file(file, ifelse(append, "a", "w")) :
  cannot open file 'D:/My_Work/output/Mydata.csv': Permission denied

我知道这个错误是因为文件已经打开了。一旦我关闭文件并尝试写入文件夹，它就可以正常工作。 我想知道是否有任何方法可以将文件写入文件夹，即使文件已经打开，并且希望使用对新文件所做的任何更改来更新打开的文件

代码如下： 我正在从Excel工作簿中读取工作表，并将其作为单独的CSV文件保存到文件夹中，文件类型为Microsoft Excel逗号分隔值文件

config_file = loadWorkbook("D:/My_Work/Input/Main.xls")
where_tab = readWorksheet(config_file, sheet = "where", header = TRUE)
write.table(where_tab,"D:/My_Work/output/Mydata.csv",sep = ",",col.names = NA)

使用此软件包：

if(!require(XLConnect)){
  install.packages("XLConnect")

}
library(XLConnect)

---

您能否发布创建csv文件的代码以及用于打开该文件的代码？（您没有用Excel之类的其他工具打开它，是吗？@r2evans我用代码编辑了我的问题。

where_tab

和

where table

应该是相同的吗？您使用的是

XLConnect

？（请包括对代码所依赖的

库

的调用。）如果您使用的data.frame不是由

读取工作表

读入，是否会发生这种情况？例如，使用

mtcars

或类似工具，查看您是否仍然存在文件锁定问题。在向SO发布问题时，确实需要有一个，并将其完全发送给可能回答的人。我建议您重新启动R（卸载所有包），使用已知数据集（如

mtcars

）触发问题，然后发布所有用于此操作的代码。一句话：我无法用您提供的内容重现您的问题，但可能有很多原因。您能否发布创建csv文件的代码以及用于打开该文件的代码？（您没有用Excel之类的其他工具打开它，是吗？@r2evans我用代码编辑了我的问题。

where_tab

和

where table

应该是相同的吗？您使用的是

XLConnect

？（请包括对代码所依赖的

库

的调用。）如果您使用的data.frame不是由

读取工作表

读入，是否会发生这种情况？例如，使用

mtcars

或类似工具，查看您是否仍然存在文件锁定问题。在向SO发布问题时，确实需要有一个，并将其完全发送给可能回答的人。我建议您重新启动R（卸载所有包），使用已知数据集（如

mtcars

）触发问题，然后发布所有用于此操作的代码。一句话：我无法用你所提供的重现你的问题，但可能有很多原因。