R/utils.R

Defines functions `%operator%`

#' @keywords internal
`%operator%` <- function(lhs, rhs) {
  if (!is.null(get_cluster())) {
    foreach::`%dopar%`(lhs, rhs)
  } else {
    foreach::`%do%`(lhs, rhs)
  }
}

Try the GBOP2 package in your browser

Any scripts or data that you put into this service are public.

GBOP2 documentation built on April 11, 2025, 5:42 p.m.