Added poistaLiianPienet

This commit is contained in:
Waldir Leoncio 2020-02-25 15:41:05 +01:00
parent 7bb6d3224b
commit eff04b3124
4 changed files with 82 additions and 0 deletions

View file

@ -227,4 +227,9 @@ test_that("simulateAllFreqs works as expected", {
test_that("computeAllFreqs2 works as expected", {
expect_equivalent(computeAllFreqs2(10), matrix(NA, 0, 0))
})
test_that("poistaLiianPienet works as expected", {
expect_equal(poistaLiianPienet(100, matrix(1:4, 2), 0), 100)
expect_equal(poistaLiianPienet(100, matrix(1:4, 2), -5), 100)
})