出现错误退出函数时自动sink()

大佬教程收集整理的这篇文章主要介绍了出现错误退出函数时自动sink()，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。

我想为我的一个函数写一个错误日志（见下文）。但是，当函数失败时，接收器将无法正确关闭。有没有办法在退出函数时始终关闭 sinks()？

some_function <- function(){


 con <- file("test.log")
 sink(con,append=TRUE,type="output",split=TRUE)
 sink(con,type="message")

 >> do some stuff that may fail. 

 sink() 
 sink(type = "message")

}

try(lm(1),outFile="error.txt")  ## failing stuff

Error in formula.default(object,env = baseenv()) : invalid formula

大佬总结

以上是大佬教程为你收集整理的出现错误退出函数时自动sink()全部内容，希望文章能够帮你解决出现错误退出函数时自动sink()所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。