R/first_non_null.R

# from microbenchmark package

first_non_null <- function (...) 
{
  isnotnull <- function(x) !is.null(x)
  Find(isnotnull, list(...))  
}
andrewhooker/MBAOD documentation built on Feb. 21, 2020, 11:19 p.m.