r - doWithOneRestart 错误

Question

我有一个更长、更复杂的代码(>7000 行)，其中包含许多嵌套函数，每个函数都包含在一个单独的 tryCatch 中。除了“伪错误”之外，代码工作完美:

Error in doWithOneRestart(return(expr), restart): no function to return from, jumping to top level 

doWithOneRestart() 在 R 内部作为 tryCatch 函数的一个元素。我称之为“伪错误”，因为如果发生错误，tryCatch 应该导致 stop() 并将错误消息写入日志文件。相反，这个“错误”并没有停止程序(实际上根本不影响它)并且它只显示在控制台上而不写入日志文件。通常的调试程序没有帮助，因为错误不可重现(!):它可能发生在程序的不同处理阶段。将警告选项更改为 0 或 -1 将无济于事。

因为程序完成了工作，所以这个错误并不严重。但我想了解发生了什么。也许有人已经遇到过同样的问题，或者可以想出一个原始的调试策略......

更新 (28.10.2013):我发现问题出在哪里。它与 java 堆溢出问题有关(我使用 xlsx 包读取 Excel 文件)。在许多其他问题中:虽然与 Excel 文件的连接已关闭(肯定!)，但系统将其视为未使用的连接(如 traceback() 所示)，尝试关闭它，但发现它已经关闭:你得到上面描述的“伪错误”，而且永远不会完全在同一时刻(不可重现)。在正确的地方使用垃圾收集器 gc() 解决了这个问题。该脚本现在可以稳定运行几天。

Answer 1

Peter Dalgaard 的建议 on R-help .

The easiest way to get that message is to execute return() from the top level:

return(1) 

You might be trying to return() from source()d file. Or maybe source()ing something that was intended to be inside a function body (extraneous '}' characters can do that).

---

通常的调试策略应该有效:在错误后调用 traceback()，或设置 options(error = recover)。