制作Shiny Server（非常重要）认为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}