R/utils.R

Defines functions is_url is_recursive

is_url <- function(x) {
  is.character(x) && length(x) == 1 && grepl("^http", x)
}

is_recursive <- function(x) vapply(x, is.recursive, logical(1))

Try the tfse package in your browser

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

tfse documentation built on May 2, 2019, 11:28 a.m.