From 6e08c35f13fda353e348600496418b02a2ac646c Mon Sep 17 00:00:00 2001 From: Waldir Leoncio Date: Wed, 7 Aug 2024 11:42:29 +0200 Subject: [PATCH] Unwrapped `greedyMix() example (#24) --- DESCRIPTION | 2 +- R/greedyMix.R | 4 +--- man/greedyMix.Rd | 4 +--- 3 files changed, 3 insertions(+), 7 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index a2e2c03..ab7405e 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -36,7 +36,7 @@ Description: Partial R implementation of the BAPS software License: GPL-3 BugReports: https://github.com/ocbe-uio/rBAPS/issues Encoding: UTF-8 -RoxygenNote: 7.3.1 +RoxygenNote: 7.3.2 Suggests: testthat (>= 2.1.0) Imports: diff --git a/R/greedyMix.R b/R/greedyMix.R index 3bff02b..9a9bc20 100644 --- a/R/greedyMix.R +++ b/R/greedyMix.R @@ -19,10 +19,8 @@ #' with high-throughput sequencing data. #' @export #' @examples -#' \dontrun{ # TEMP: unwrap once #24 is resolved -#' data <- system.file("extdata", "BAPS_format_clustering_diploid.txt", package = "rBAPS") +#' data <- system.file("extdata", "BAPS_clustering_diploid.txt", package = "rBAPS") #' greedyMix(data, "baps") -#' } # TEMP: unwrap once #24 is resolved greedyMix <- function( data, format = gsub("^.*\\.", "", data), partitionCompare = NULL, npops = 3L, counts = NULL, sumcounts = NULL, max_iter = 100L, alleleCodes = NULL, diff --git a/man/greedyMix.Rd b/man/greedyMix.Rd index 2d1a0e4..5974165 100644 --- a/man/greedyMix.Rd +++ b/man/greedyMix.Rd @@ -48,10 +48,8 @@ greedyMix( Clustering of individuals } \examples{ -\dontrun{ # TEMP: unwrap once #24 is resolved -data <- system.file("extdata", "BAPS_format_clustering_diploid.txt", package = "rBAPS") +data <- system.file("extdata", "BAPS_clustering_diploid.txt", package = "rBAPS") greedyMix(data, "baps") -} # TEMP: unwrap once #24 is resolved } \references{ Samtools: a suite of programs for interacting