如何在 R 中的错误消息中格式化输出

【问题标题】：How can I format the output in an error message in R如何在 R 中的错误消息中格式化输出
【发布时间】：2019-04-04 13:50:43
【问题描述】：

我想在我的 R 函数中向用户显示特定错误的错误消息。为此，我创建了一个输出作为 tibble。让我们假设：

err_out = tibble(a=c(1,2), b=c(3,4)) 
stop("Error X happend:", err_out)

我得到Error: Error X happend:c(1, 2)c(3, 4) 但我更喜欢小标题的典型表示，即

Error: Error X happend:
# A tibble: 2 x 2
      a     b
  <dbl> <dbl>
 1     1     3
 2     2     4

【问题讨论】：

标签： r error-handling

【解决方案1】：

这行得通：

err_out = tibble(a=c(1,2), b=c(3,4))
stop("Error X happened:\n", paste(capture.output(err_out), collapse = "\n"))
# Error: Error X happened:
# # A tibble: 2 x 2
#       a     b
#   <dbl> <dbl>
# 1     1     3
# 2     2     4

如果您经常这样做，您可能希望将其封装在一个实用函数中。

【讨论】：