Unwrapped `greedyMix() example (#24)

This commit is contained in:
Waldir Leoncio 2024-08-07 11:42:29 +02:00
parent d861ffb551
commit 6e08c35f13
3 changed files with 3 additions and 7 deletions

View file

@ -36,7 +36,7 @@ Description: Partial R implementation of the BAPS software
License: GPL-3 License: GPL-3
BugReports: https://github.com/ocbe-uio/rBAPS/issues BugReports: https://github.com/ocbe-uio/rBAPS/issues
Encoding: UTF-8 Encoding: UTF-8
RoxygenNote: 7.3.1 RoxygenNote: 7.3.2
Suggests: Suggests:
testthat (>= 2.1.0) testthat (>= 2.1.0)
Imports: Imports:

View file

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

View file

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