R/count_rows.R

Defines functions count_rows

#' @keywords internal
#'
#' @importFrom magrittr %>%
count_rows <- function(x) {
    x %>%
        apply(2, unique) %>%
        lapply(length) %>%
        as.integer() %>%
        cumsum()
}
waldronlab/HMP16SData documentation built on Oct. 26, 2023, 5:42 a.m.