Question

我想通过将其修改为ShinyApp来创建自定义R脚本。当前脚本将运行工作目录中存在的所有XML文件，并创建统计信息和图形。

在我的脚本中，我使用此行将工作目录中的相关文件读入R：

 filelist$file <- list.files(".", pattern = ".xml")

然而，ShinyApp并没有提供这样的功能（只有file.input用于单个或多个文件），而使用choose.dir的解决方案仅限于Windows系统，但我希望独立于操作系统。如果有人可以指出我正确的步骤来实现这个功能，那么它可以在浏览器中的ShinyApp上运行。

Answer 1

最接近的可能是：

fileInput('uploadfile', '', multiple=TRUE, accept = c(".xlm"))

用户将选择目录中的所有文件（例如，使用ctrl-A或cmd-A），但只会选择.xlm文件。