r - 无法从 R Shiny 中的 SQLite 数据库中找到表

Question

我有一个包含表“sae”的 sqlite 数据库，并希望从 Shiny 界面访问该表。我在 RStudio 命令行中尝试了以下代码：

library(RSQLite)
f.sae <- "link/to/my/data.db"
m <- dbDriver("SQLite")
con.sae <- dbConnect(m,dbname=f.sae)

这在命令行和 Shiny 上都可以正常工作，但是如果我查看我得到的内容：

print(dbListTables(con.sae))

在命令行中：

[1] "sae"

在 Shiny 中使用 runApp()

character(0)

这个问题已经讨论过了（见下文），Shiny 更改当前工作目录的方式似乎是原因，

https://groups.google.com/forum/#!topic/shiny-discuss/-8S9PKeXLNw https://groups.google.com/forum/#!topic/shiny-discuss/sDVMbBNPc-s

但我无法找到解决办法，即使强制 setwd()。