From e4af251307533cf2759cbaaaa4c5457436a30494 Mon Sep 17 00:00:00 2001 From: Waldir Leoncio Date: Tue, 2 Jul 2024 11:23:22 +0200 Subject: [PATCH] Fixed tests (#24) --- tests/testthat/test-greedyMix.R | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) diff --git a/tests/testthat/test-greedyMix.R b/tests/testthat/test-greedyMix.R index 6a4f2f2..86cf9fb 100644 --- a/tests/testthat/test-greedyMix.R +++ b/tests/testthat/test-greedyMix.R @@ -46,11 +46,10 @@ 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" -# ) +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)) @@ -71,7 +70,7 @@ test_that("Files are imported correctly", { ) }) -test_that("greedyMix() works", { +test_that("greedyMix() fails successfully", { expect_error(greedyMix(file.path(path_inst, "vcf_example.vcf"))) expect_error(greedyMix(file.path(path_inst, "bam_example.bam"))) })