R/utils.R

In cubelyr: A Data Cube 'dplyr' Backend

Defines functions any_apply commas

commas <- function(...) paste0(..., collapse = ", ")

any_apply <- function(xs, f) {
  for (x in xs) {
    if (f(x)) return(TRUE)
  }
  FALSE
}

Try the cubelyr package in your browser