R Studio - 使用R命令保存所有脚本

Question

有没有办法在R Studio中使用R命令保存所有脚本？有一个带键盘快捷键的按钮（Ctrl + Alt + s），可以保存所有已修改的打开脚本。

目的是让我可以将Shiny :: runapp（）包装到一个函数中，该函数包括在运行之前保存所有脚本。这样可以节省运行Shiny应用程序而不先保存的所有时间 - 相当长的时间让我忘记了！

功能如下：

runapp2 <- function(){
  save_all_modified_scripts() # <- hope you exist
  Shiny::runapp()
}

更新（感谢Marius） - 这对我有用：

save_and_run <- function(){
  rstudioapi::documentSaveAll()
  shiny::runApp()
}

Answer 1

rstudioapi包中有一个函数（内置于RStudio）：

rstudioapi::documentSaveAll()

我没有对它进行过广泛的测试，所以我不确定它的效果如何，但似乎确实做了所需要的。