diff --git a/man/convert_FASTA_to_BAPS.Rd b/man/convert_FASTA_to_BAPS.Rd index ebc7396..e43d7eb 100644 --- a/man/convert_FASTA_to_BAPS.Rd +++ b/man/convert_FASTA_to_BAPS.Rd @@ -2,22 +2,22 @@ % Please edit documentation in R/convert_FASTA_to_BAPS.R \name{convert_FASTA_to_BAPS} \alias{convert_FASTA_to_BAPS} -\title{Convert an R object from FASTA to BAPS format} +\title{Convert from FASTA to BAPS} \usage{ -convert_FASTA_to_BAPS(data) +convert_FASTA_to_BAPS(file) } \arguments{ -\item{data}{dataset to be converted} +\item{file}{filename of FASTA file} } \value{ `data` in BAPS format } \description{ -Converts an R object from FASTA to BAPS format +Converts a file (not an R object) from FASTA to BAPS format } \examples{ -data <- system.file("extdata", "FASTA_clustering_diploid.fasta", package = "rBAPS") -convert_FASTA_to_BAPS(data) +file <- system.file("extdata", "FASTA_clustering_haploid.fasta", package = "rBAPS") +convert_FASTA_to_BAPS(file) } \author{ Waldir Leoncio diff --git a/tests/testthat/test-greedyMix.R b/tests/testthat/test-greedyMix.R index ff83883..9353b0a 100644 --- a/tests/testthat/test-greedyMix.R +++ b/tests/testthat/test-greedyMix.R @@ -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")