R 在评估停止函数后禁用回溯

Question

我正在使用一个函数进行错误处理，该函数在另一个函数中使用。这看起来像：

foo <- function() {
 fooo <- function () {
    stop('Hello World')
  }
  fooo()
}

现在，在调用 时foo()，R 将提供回溯选项。但是，如果 onlyfooo()被调用（首先将其作为独立函数运行之后），该stop()函数将产生一条错误消息，而不会回溯。理想情况下，我会阻止 R 生成回溯选项并仅将错误消息打印到控制台。那么..我该怎么做呢？