r - file.choose() 自定义对话窗口答案

【问题标题】：r - file.choose() customizing dialogue windowr - file.choose() 自定义对话窗口
【发布时间】：2013-04-20 01:52:10
【问题描述】：

有没有办法让file.choose()运行后弹出的对话框显示自定义标题，类似于X <- menu(files, graphics=TRUE, title="Choose file X")？

现在我的代码需要加载几个文件。

X <- read.csv(file.choose())
Y <- read.csv(file.choose())
Z <- read.csv(file.choose())

目前我只是使用我的（人类）记忆来知道为第一个窗口、第二个窗口和第三个窗口选择哪些文件，但我希望窗口显示哪个对象X Y 或 Z 当前窗口的文件将被导入。我可以将窗口移到一边，看看控制台正在执行哪一行代码，但这似乎很不雅。

例如，我尝试过X <- read.csv(file.choose(new=c("Choose X")))，但这似乎没有任何作用。

【问题讨论】：

标签： r import

【解决方案1】：

另一种选择：

library(tcltk)
X <- read.csv(tk_choose.files(caption = "Choose X"))

看到该功能还可以用于一次调用选择多个文件。为此，请在选择多个文件时按住 CTRL：

XYZ.list <- lapply(tk_choose.files(caption = "Choose X, Y, and Z"), read.csv)

但不会保留选择顺序，因此如果对您更有效，您可能希望保留三个单独的调用。

【讨论】：

【解决方案2】：

在 Windows 上，您可以使用 choose.files，它允许自定义标题和默认文件名 (default)、文件类型过滤 (filters) 和多文件选择 (multi)：

choose.files(default = "", caption = "Select files",
             multi = TRUE, filters = Filters,
             index = nrow(Filters))

查看帮助?choose.files ;)

【讨论】：