R Shiny on Ubuntu Server：用户无法在Windows平台中打开文件夹

Question

我在Windows上运行R Shiny应用程序，一切都很好。但是现在我在Ubuntu Server中运行代码，用户无法打开该文件夹。

用于打开文件夹的代码：

opendir <- function(dir) {
    if (.Platform['OS.type'] == "windows"){
      shell.exec(dir)
    } else {
      system(paste(Sys.getenv("R_BROWSER"), dir))
    }
  }

也许问题出现是因为脚本正在读取服务器操作系统（而不是用户）并且没有执行shell_exec。

Answer 1

问题解决了：

正确的方法是在R中使用html，但这仅适用于IE。例：

tags$a(href=file://C:/My Computer")