使用指定路径启动mac finder窗口

Question

有没有办法从RGUI命令行启动mac finder窗口？我正在浏览一堆文件，看到文件夹而不必使用list.files（）

会很有帮助。

Answer 1

要从RGUI命令行打开Finder，直接解决方案是使用：

system("open /System/Library/CoreServices/Finder.app/")

编辑：对于指定的路径，system("open ~/Desktop")会在用户的桌面上打开Finder，例如，因为在MacOSX中，打开任何目录的默认应用程序是Finder。

Answer 2

要使用Mac选择（并返回R）文件，可以按如下方式完成本机文件选择对话框，尽管此解决方案依赖于qtbase和Qt库：

library(qtbase)
file_selector <- function(initial_dir=getwd(), multiple=FALSE) {
  f <- Qt$QFileDialog()
  ## configure
  f$setDirectory(initial_dir)
  if(multiple)
    f$setFileMode(Qt$QFileDialog$ExistingFiles)
  ## run
  out <- f$exec()
  if(out == 1)
    f$selectedFiles()
  else
    NULL
}

如果您安装了aqua tk库（而不是X11库），那么可能会使用tkgetOpenFile，但我没有检查。