R/rank_product.R

In BAAQMD/qtytools: Parse, Manipulate, and Predict Quantities

#' @export
rank_product <- function (...) {

  data.frame(...) %>%
    mutate_all(
      ~ rank_fraction(.)) %>% # WAS: mutate_each(funs(rank_fraction)) %>%
    apply(
      MARGIN = 1,
      GM)

}