pkg中的expect_not_equal：testthat

Question

我想使用'testthat'測試兩個值不相等。 我可以用類似的東西來測試平等

expect_that(x, equals(y))

但是，如果我期望它們不相等怎么辦？ 我可以用

expect_false(x == y)

這是正確的方法，還是有類似的東西

expect_that(x, not_equals(y))

Answer 1

函數testthat::equals()實際上是all.equal的包裝器。 所以你可以像這樣構建你的測試：

x <- 1:5
y <- 2:6
expect_false(isTRUE(all.equal(x, y)))
expect_false(isTRUE(all.equal(x+1, y)))
Error: isTRUE(all.equal(x + 1, y)) isn't false

你需要在那里使用isTRUE ，因為如果參數不相等， all.equal返回一個字符串。