From 8b8a689f7680a4cdc017f87fc478dee6fe9cfdc2 Mon Sep 17 00:00:00 2001
From: Waldir Leoncio <waldir.leoncio@gmail.com>
Date: Tue, 25 Feb 2020 14:29:09 +0100
Subject: [PATCH] Added test unit

---
 tests/testthat/test-admix1.R | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/tests/testthat/test-admix1.R b/tests/testthat/test-admix1.R
index 0be71f7..12ae460 100644
--- a/tests/testthat/test-admix1.R
+++ b/tests/testthat/test-admix1.R
@@ -223,4 +223,8 @@ test_that("simulateAllFreqs works as expected", {
         object = suppressWarnings(simulateAllFreqs(matrix(1:4, 2))),
         expected = empty_mt
     )
+})
+
+test_that("computeAllFreqs2 works as expected", {
+    expect_equivalent(computeAllFreqs2(10), matrix(NA, 0, 0))
 })
\ No newline at end of file