R/misc.R

allOK <- function(results) {
  is.error <- function(x) inherits(x, "try-error")
  ok <- !sapply(results, is.error)
  ok
}
axelmuller/geometric2 documentation built on May 25, 2019, 6:26 p.m.