相关疑难解决方法(0)

你如何打印到stderr的R？

这对于编写的脚本特别有用Rscript.

我想使用一个将错误导出到.txt文件的函数.到目前为止,我有:

error.function <- function() {
cat(geterrmessage(), file="c:/bla.txt", append=TRUE)
}

然后,

options("error"=error.function)

但是,这只能给我error没有相应的行号我可以请求帮助以扩展error.function以及有关行号的信息(我在Rstudio中的脚本以line1开头并上升到第2500行？

我在 R 中编写了一个函数来将任何消息打印到日志文件和控制台。但是如果在运行代码时出现任何意外错误，那么错误只会显示到控制台。有没有办法将错误消息同时写入控制台和日志文件？这里是功能..

log_con <- file("Text1.txt", open="a")

loggerfn<-function(Message,LogConnection=log_con){
  cat(Message, file = LogConnection)
  cat(Message)
}

这是示例代码，用于...

for (i in 1:10)
 {
  loggerfn("loop begins\n",log_con)
   a <- rnorm(n = 100, mean = i, sd = 5)
   loggerfn(mean(a),log_con)
   loggerfn("loop Completed\n",log_con)
   if(i==8){
     sdfs
   }
 }

在上面的代码中，我通过提供未定义的对象 sdfd 故意引入了错误。下面提供的错误消息仅显示在控制台中，有没有办法将错误消息同时写入控制台和日志文件？

Error: object 'sdfs' not found