Skips greedyMix() example until #24 is fixed

This commit is contained in:
Waldir Leoncio 2024-04-08 13:34:14 +02:00
parent f676042a17
commit f5c09094b0
2 changed files with 6 additions and 2 deletions

View file

@ -19,8 +19,10 @@
#' with high-throughput sequencing data. <http://www.htslib.org/>
#' @export
#' @examples
#' \dontrun{ # TEMP: unwrap once #24 is resolved
#' data <- system.file("extdata", "BAPS_format_clustering_diploid.txt", package = "rBAPS")
#' greedyMix(data, "baps")
#' } # TEMP: unwrap once #24 is resolved
greedyMix <- function(
data, format = gsub("^.*\\.", "", data), partitionCompare = NULL, npops = 1L,
counts = NULL, sumcounts = NULL, max_iter = 100L, alleleCodes = NULL,

View file

@ -48,8 +48,10 @@ greedyMix(
Clustering of individuals
}
\examples{
data <- system.file("extdata", "FASTA_clustering_haploid.fasta", package = "rBAPS")
greedyMix(data, "fasta")
\dontrun{ # TEMP: unwrap once #24 is resolved
data <- system.file("extdata", "BAPS_format_clustering_diploid.txt", package = "rBAPS")
greedyMix(data, "baps")
} # TEMP: unwrap once #24 is resolved
}
\references{
Samtools: a suite of programs for interacting