From 2a815f15cd7235182efd05fe4eaef94e7b805409 Mon Sep 17 00:00:00 2001
From: Waldir Leoncio <w.l.netto@medisin.uio.no>
Date: Wed, 10 Apr 2024 16:06:23 +0200
Subject: [PATCH] Added (commented) test for BAPS data (#24)

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

diff --git a/tests/testthat/test-greedyMix.R b/tests/testthat/test-greedyMix.R
index 47cd463..6a4f2f2 100644
--- a/tests/testthat/test-greedyMix.R
+++ b/tests/testthat/test-greedyMix.R
@@ -46,6 +46,11 @@ raw_bam <- importFile(
   data    = file.path(path_inst, "bam_example.bam"),
   format  = "BAM",
 )
+# TODO: uncomment for testing #24
+# raw_baps <- importFile(
+#   data   = file.path(path_inst, "FASTA_clustering_haploid.fasta"),
+#   format = "FASTA"
+# )
 
 test_that("Files are imported correctly", {
   expect_equal(dim(raw_fasta), c(5, 99))