r - 检测 Shiny 是否运行 R 代码

Question

我想在两个位置运行 R 代码，一个是 Rnw 文件，另一个是作为交互式 Shiny R Markdown 文档。

因此，由于交互式 Shiny 组件在 Rnw 文件中不起作用，我需要的是 R 中的代码片段，用于检测是否加载交互式代码。

这似乎有效，但感觉就像一个快速的黑客:

if (exists("input")) { # input is provided by shiny
    # interactive components like renderPlot for shiny
} else {
    # non-interactive code for Rnw file
}

是否有稳定的解决方案或诸如全局变量之类的东西，我可以访问它来说明目前是否正在运行 Shiny？或者我应该检查是否 shiny包已加载？

什么最安全？

Answer 1

现在有一个功能 shiny::isRunning() .