r - File.choose() 输出数据时？

Question

我想使用相同的脚本来处理存储在不同位置的许多文本文件中的数据，然后将输出保存到另一个唯一的位置，而不必每次都修改我的脚本。我输入数据使用:
data <- read.table(file.choose(),header=T)
并想用类似的界面保存最终表格以选择位置并输入文件名称。

我试过了:
write.csv(data.table,file.choose())
但这只适用于我在运行脚本之前在我想要的位置创建一个带有我想要的名称的空 .csv 文件。

有没有另一种(更好的)方法来做到这一点？

Answer 1

有几种可能:

library(gWidgets)
fileName <- gfile(type = "save") 

library(tcltk)
fileName <- tclvalue(tkgetSaveFile()) 

library(svDialogs)
fileName <- dlgSave()$res 

dlgSave需要创建新文件时要求确认， tkgetSaveFile使用附加参数( some basic examples )和 gfile 似乎有点复杂提供多种选择。