如何在退出R脚本之前注册要调用的函数

Question

我想在R流程意外退出之前做一些清理工作。在R中有没有类似java的关闭钩子？感谢

Answer 1

定义一个.Last函数就可以了。

.Last <- function() {
    printf("\n  == END of R | %s (runtime %s) ==\n", Sys.time(),format(round(difftime(Sys.time(), .r.start.time), 2)))
}

类似。在脚本开始时调用第一个函数。