diff --git a/inst/extdata/BAPS_format_clustering_diploid.txt b/inst/extdata/BAPS_clustering_diploid.txt similarity index 100% rename from inst/extdata/BAPS_format_clustering_diploid.txt rename to inst/extdata/BAPS_clustering_diploid.txt diff --git a/inst/extdata/BAPS_clustering_haploid.txt b/inst/extdata/BAPS_clustering_haploid.txt new file mode 100644 index 0000000..4623678 --- /dev/null +++ b/inst/extdata/BAPS_clustering_haploid.txt @@ -0,0 +1,5 @@ +88 102 56 80 100 90 118 -9 88 104 1 +80 102 54 82 102 92 116 90 86 104 2 +88 104 56 84 102 -9 120 90 88 100 3 +86 102 56 80 102 90 116 90 86 100 4 +88 102 -9 80 102 90 116 92 86 100 5 diff --git a/tests/testthat/test-greedyMix.R b/tests/testthat/test-greedyMix.R index 20380af..47cd463 100644 --- a/tests/testthat/test-greedyMix.R +++ b/tests/testthat/test-greedyMix.R @@ -5,7 +5,7 @@ path_inst <- system.file("extdata", "", package = "rBAPS") # Reading datasets ------------------------------------------------------------- baps_diploid <- read.delim( - file = file.path(path_inst, "BAPS_format_clustering_diploid.txt"), + file = file.path(path_inst, "BAPS_clustering_diploid.txt"), sep = " ", header = FALSE )