Improve test coverage

.github/workflows/test-coverage.yaml

@@ -43,6 +43,7 @@ jobs:
           git clone https://github.com/torognes/swarm.git \
           && cd swarm/ \
           && make
+          sudo cp ../swarm /usr/bin/swarm
 
       - name: Install cutadapt
         run: |

NEWS.md

@@ -32,7 +32,7 @@
 - Add functions `get_funguild_db()` and `funguild_assign()` from the [FUNGuildR](https://github.com/brendanf/FUNGuildR/) package into MiscMetabar to decrease package dependencies 
 - Remove all dependencies from packages not available on CRAN or Bioconductor. Improve code using `goodpractice::gp`() and `devtools::check()` function
 - Add messages in various cases (NA in samples data, low number of sequences in samples, low number of sequences by taxa) when using `verify_pq()` with args `verbose=TRUE`
-- Fix a bug in `mutitax_bar_pq()` when using `nb_seq = FALSE`
+- Fix a bug in `multitax_bar_pq()` when using `nb_seq = FALSE`
 
 # MiscMetabar 0.52 
 

R/beta_div_test.R

@@ -586,6 +586,16 @@ multipatt_pq <- function(physeq,
 #'   ), color = "darkgrey") +
 #'   geom_point()
 #'
+#' res_time <- ancombc_pq(
+#'    subset_taxa_pq(
+#'      data_fungi_sp_known,
+#'      taxa_sums(data_fungi_sp_known) > 5000
+#'    ),
+#'    fact = "Time",
+#'    levels_fact = c("0", "15"),
+#'    tax_level = "Family",
+#'    verbose = TRUE
+#'  )
 #' @author Adrien Taudière
 #' @details
 #' This function is mainly a wrapper of the work of others.

R/blast.R

@@ -45,7 +45,7 @@
 #'
 #' @examples
 #' \dontrun{
-#' # data(data_fungi)
+#' 
 #' blastpath <- "...YOUR_PATH_TO_BLAST..."
 #' blast_to_phyloseq(data_fungi,
 #'   seq2search = system.file("extdata", "ex.fasta",

R/controls.R

@@ -145,7 +145,7 @@ dist_pos_control <- function(physeq, samples_names, method = "bray") {
 #' @export
 #'
 #' @examples
-#' # data(data_fungi)
+#' 
 #'
 #' subset_taxa_tax_control(data_fungi,
 #'   as.numeric(data_fungi@otu_table[, 300]),