max/ourMELONS
1
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

Fixing test expectation

Browse source
This commit is contained in:
Waldir Leoncio 2022-04-13 08:59:07 +02:00
parent f81a078365
commit 9b1cf810a3
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tests/testthat/test-greedyPopMix.R
View file

@ -26,9 +26,9 @@ test_that("Auxiliary functions work properly", {
newData = matrix(c(3: 1, 3: 1, 1: 3), 3), newData = matrix(c(3: 1, 3: 1, 1: 3), 3),
rows = matrix(c(1: 3, 1: 3), 3), rows = matrix(c(1: 3, 1: 3), 3),
alleleCodes = matrix(c(1, 4, 9, 2, 5, 8), 3), alleleCodes = matrix(c(1, 4, 9, 2, 5, 8), 3),
noalle = c(3, 3), noalle = matrix(c(3, 3), 1),
adjprior = matrix(rep(3/9, 6), 3), adjprior = matrix(rep(3/9, 6), 3),
priorTerm = 5.9125 priorTerm = 5.9125
) )
expect_equal(handlePopData(x3), y3) expect_equal(handlePopData(x3), y3, tol = 1e-4)
}) })