R：如何使用 expect_success 函数进行单元测试？答案

【问题标题】：R: How does one use the expect_success function for unit tests?R：如何使用 expect_success 函数进行单元测试？
【发布时间】：2020-04-27 06:35:54
【问题描述】：

我有一个表达式，我想使用 testthat 包进行测试。在expect_success 的文档中，它声明函数的用法是

expect_success(expr)

其中expr 是一个计算结果为单一期望的表达式。

例如，使用此代码

test_that("Expectation succeeds", {
  x <- 1:10
  expect_success(mean(x)) 
})

我得到了错误

Error: Test failed: 'Expectation succeeds'
* no expectation used.

我哪里错了？

【问题讨论】：

标签： r testthat

【解决方案1】：

其实，在写问题的时候，我进一步试验了代码，发现一开始我并没有完全理解文档。此函数用于测试其他预期。因此，对于问题中使用的示例，这可以按预期工作

test_that("Expectation succeeds", {
  x <- 1:10
  expect_success(expect_type(mean(x), 'double')) 
})

【讨论】：