从外部服务器上托管的Shiny应用程序访问本地目录结构？

Question

我正在尝试构建一个Shiny应用程序，该应用程序允许用户在其本地计算机上选择目录，以便将许多选择文件自动递归上传到外部数据库。但是，从外部运行的应用程序访问本地目录结构时遇到问题。

我当前正在尝试使用软件包ShinyFiles访问目录结构，但是只能让它做与我想做的相反的事情，即从本地运行应用程序访问外部目录结构。这是我目前正在使用的代码：

# main/ui.R

library(shinyFiles)

fluidPage(
  shinyFiles::shinyDirButton("directory", label = "Choose directory:", title = "Choose directory:")
)

# main/server.R

library(shinyFiles)

function(input, output, session) {
  shinyFiles::shinyDirChoose(input, "directory", root = c(root = "."))
}

是否有一种简单的方法来修改此代码，使其能够在本地系统而不是外部系统上显示目录结构？