Fix last released version's additional issues

tesselle · Mar 19, 2019 · 6c0d003 · 6c0d003
1 parent 591b45f
commit 6c0d003
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/tests/testthat/test-rarefaction.R b/tests/testthat/test-rarefaction.R
@@ -9,7 +9,7 @@ test_that("Rarefaction", {
   expected <- c(`1` = 6.56, `2` = NA)
   index <- rarefaction(trap, 13)
 
-  expect_identical(round(index, digits = 2), expected)
+  expect_equal(round(index, digits = 2), expected)
 
   freq <- as(trap, "FrequencyMatrix")
   expect_error(rarefaction(freq, 13))

diff --git a/tests/testthat/test-richness.R b/tests/testthat/test-richness.R
@@ -13,7 +13,7 @@ test_that("Richness", {
                      dimnames = list(c(1,2), method))
 
   index <- richness(trap, method, simplify = TRUE)
-  expect_identical(round(index, digits = 2), expected)
+  expect_equal(round(index, digits = 2), expected)
 
   # Frequency data
   freq <- as(trap, "FrequencyMatrix")