R 是否有导出错误消息的方法？

我的问题很笼统，但不知何故很难给出一个可复制的例子。当运行一些长的R脚本时，有时会出现不合理的错误。由于脚本的长度及其背后的数据库，查找错误通常是困难和耗时的。是否有办法将错误以某种方式导出到文本文件，例如？

一个优雅的解决方案：

定义一个错误函数：

my.error.fun <- function() {
  cat(geterrmessage(), file="rerr.txt", append=TRUE)
}

options("error"=my.error.fun)