Заставить Shiny Server (действительно большой запрос) думать, что R запускается в интерактивном режиме
У меня блестящее приложение на сервере Shiny, но один из пакетов, используемых в приложении, рассердится, если R не находится в интерактивном режиме. Для функциональности, которую я использую, мне не нужна интерактивность.
Я знаю, что могу использовать опцию --interactive при запуске R из командной строки. Есть ли способ передать это на блестящий сервер?
Спасибо!
Редактировать - кажется, что конкретная проблема связана с пакетом bigrquery. призвание query_exec
с сервера блестящий возвращает ошибку: interactive() is not TRUE
,
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}