R/subset_community.R

In HOPE-UIB-BIO/R-Ratepol-package: R-Ratepol: Estimating Rate of Change in Temporal Sequences

#' @title Subset data to only contain community (taxa)
#'
#' @param data_source Data.frame wich shuld be cleaned.
#' @param ommit_vars Vector with names of columns to ommit.
#' @keywords internal
subset_community <-
    function(data_source,
             ommit_vars = c("label", "res_age", "age_diff", "age")) {
        data_source %>%
            dplyr::select(
                !dplyr::any_of(
                    c(ommit_vars)
                )
            ) %>%
            return()
    }