R/is.R

In delaunay: 2d, 2.5d, and 3d Delaunay Tessellations

Defines functions isBoolean isStrictPositiveInteger isPositiveInteger isNonNegativeNumber isPositiveNumber isAtomicVector isFalsy

isFalsy <- function(x){
  isFALSE(x) || is.null(x) || is.na(x)
}

isAtomicVector <- function(x){
  is.atomic(x) && is.vector(x)
}

isPositiveNumber <- function(x){
  is.numeric(x) && length(x) == 1L && x > 0 && !is.na(x)
}

isNonNegativeNumber <- function(x){
  is.numeric(x) && length(x) == 1L && x >= 0 && !is.na(x)
}

isPositiveInteger <- function(x){
  is.numeric(x) && length(x) == 1L && !is.na(x) && floor(x) == x
}

isStrictPositiveInteger <- function(x){
  isPositiveInteger(x) && x > 0
}

isBoolean <- function(x){
  is.logical(x) && length(x) == 1L && !is.na(x)
}

Try the delaunay package in your browser