如何修改app.R免去启动Shiny应用前手动输入控制台命令

完全可以把你之前手动执行的3步操作直接写入app.R文件头部，实现启动流程自动化，不需要每次在控制台手动敲命令。

具体实现代码 #

把以下代码放到app.R文件的最顶端，位于所有shiny业务逻辑、自定义函数加载代码之前即可：

# 自动加载devtools，未安装时自动安装
if (!requireNamespace("devtools", quietly = TRUE)) {
  install.packages("devtools", repos = "https://cran.rstudio.com/")
}
library(devtools)

# 自动执行包文档生成
# 注意：如果app.R不在R包项目根目录，请将pkg参数替换为R包根目录的相对/绝对路径
document()

# RStudio环境下自动配置shiny用外部系统浏览器打开，非RStudio环境跳过避免报错
if (Sys.getenv("RSTUDIO") == "1") {
  options(shiny.launch.browser = .rs.invokeShinyWindowExternal)
}

可选优化项 #

• 如果你想省掉手动调用runApp()的步骤，可以直接在app.R文件的最后一行加上shiny::runApp()，之后直接点RStudio脚本编辑器上的「Run App」按钮，或者执行source("app.R")就能一键启动应用。
• 如果项目包体积大，每次跑document()耗时久，可以给这行加判断逻辑，比如检测到包内R代码有更新时再执行文档生成，日常调试阶段也可以临时注释这行。
• 如果需要固定shiny的启动端口、加载其他前置依赖，都可以直接在这个头部配置区加对应的代码，不用再单独手动输入。

注意事项 #

• document()是devtools提供的R包文档生成函数，默认读取当前工作目录下的R包结构，如果你的app.R存放在R包的子目录（比如常见的inst/shinyapp/路径），需要给document()传入正确的包路径，例如document(pkg = "../../")，否则会抛出找不到包结构的错误。
• 这里配置的shiny启动浏览器规则仅对当前应用生效，不会修改你RStudio的全局shiny启动设置，不会影响其他shiny项目的运行。

内容的提问来源于stack exchange，提问作者Jun Jie