R/vectorized.R

Defines functions is_vectorized

# simple function to test if a function is Vectorized
is_vectorized <- function(x) {
  is.function(x) && exists("FUN", environment(x), mode = "function") && exists("vectorize.args", environment(x))
}

Try the covr package in your browser

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

covr documentation built on Nov. 9, 2023, 9:07 a.m.