r语言 - 是否可以在关闭 Rstudio 时获取自定义消息?

Question

我有多个工作站，我在github上同步R项目代码。我想在关闭 R studio 之前收到警报以提交并在 github 中推送我的代码。

我找到了在浏览器的情况下获取自定义警报消息的方法，这些方法在jscript，java查询编码的情况下最有用，但我找不到Rstudio的任何选项。

我没有远程服务器访问权限，所以一旦我忘记提交我的代码，就很难访问其他工作站上的代码。因此，我想在关闭 R Studio 并离开当前工作站时自定义警报。

以下是几个示例 刷新前执行函数

Answer 1

是的。您需要构建一个名为.Last的函数，这记录在帮助页面?q中。.Last将在您退出时运行。请注意，除非.Last抛出错误，否则R 将在.Last完成后退出，因此，如果您希望有机会返回并保存您的工作，您可能希望在尚未保存工作的情况下在函数中调用stop()。 一个简单的例子可能是：

.Last <- function() {
cat("Did you remember to save to Git?n")
flush.console()
while(TRUE) {
response <- readline(prompt="Did you save to Git? ")
if(grepl("Y", response, ignore.case=TRUE)) { 
cat("OK. Byen")
return() 
} else {
if(grepl("N", response, ignore.case=TRUE)) { 
cat("Better saven")
stop() 
} else {
cat("Please answer Yes or Non")
flush.console() }
}
}
}