r - 让 Shiny Server（真正的 bigrquery）认为 R 正在交互式运行

Question

我在 Shiny 服务器上有一个闪亮的应用程序，但如果 R​​ 未处于交互模式，则应用程序中使用的一个包会生气。对于我正在使用的功能，我不需要交互性。

我知道从命令行启动 R 时可以使用 --interactive 选项。有没有办法将它传递给闪亮的服务器？

谢谢！

编辑 - 具体问题似乎与 bigrquery 包有关。从闪亮的服务器调用query_exec返回错误：interactive() is not TRUE.

Answer 1

也许 global.R 中的以下内容会有所帮助（注意注意?assignInNamespace等中的免责声明）：

interactive <- function(){TRUE}
unlockBinding(sym="interactive", env=getNamespace("base"));
assignInNamespace(x="interactive", value=interactive, ns=asNamespace("base"), envir=getNamespace("base"));
assign("interactive", interactive, envir=getNamespace("base"));
lockBinding(sym="interactive", env=getNamespace("base"));
> 
> rm(interactive)
> interactive
function(){TRUE}
> base::interactive
function(){TRUE}