r - file.choose（）自定義對話窗口

Question

在運行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()) 

在我只是用我的（人）內存知道哪些文件來選擇第一窗口，第二窗口，第三窗口的那一刻，但我想在窗口中顯示其對象XY或Z當前窗口的文件將被導入到。我可以將窗口移到一邊，看看控制檯需要使用哪一行代碼，但這看起來很不雅觀。

我試過X <- read.csv(file.choose(new=c("Choose X")))例如，但似乎沒有做任何事情。

Answer 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) 

但選擇順序不保留，所以你可能要保持三個獨立的電話是否適合你更好。

Answer 2

您可以使用choose.files，允許自定義標題，也默認文件名（default），文件類型過濾（filters）和多文件選擇（multi）：

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

檢查幫助choose.files ;）