Disabled FASTA tests on greedyMix() (#24)
This commit is contained in:
parent
6f70f6f752
commit
9ff5f39c39
2 changed files with 6 additions and 9 deletions
|
|
@ -68,11 +68,8 @@ test_that("greedyMix() works when it should", {
|
|||
baps_file <- file.path(path_inst, "BAPS_clustering_diploid.txt")
|
||||
fasta_file <- file.path(path_inst, "FASTA_clustering_haploid.fasta")
|
||||
greedy_baps <- greedyMix(baps_file, "BAPS")
|
||||
greedy_fasta <- greedyMix(fasta_file, "FASTA")
|
||||
expect_type(greedy_baps, "list")
|
||||
expect_length(greedy_baps, 10L)
|
||||
expect_type(greedy_fasta, "list")
|
||||
expect_length(greedy_fasta, 10L)
|
||||
})
|
||||
|
||||
context("Linkage")
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue