Fix bug in getDataReady.

waldronlab · Jan 22, 2024 · 02436a0 · 02436a0
1 parent 683fa40
commit 02436a0
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/taxPPro.R b/R/taxPPro.R
@@ -381,6 +381,7 @@ getSetWithoutIDs <- function(tbl, set_with_ids = NULL) {
             # dplyr::relocate(tidyselect::all_of(.orderedColumns()))
     } else {
         output <- tbl |>
+            dplyr::filter(lgl_vct) |>
             dplyr::select(
                 -.data$NCBI_ID, -.data$Frequency
             ) |>