R/inInterval.R

In ssaxe-usgs/saxy: Misc Functions

#' Check if Value is in Range
#'
#' Test to see if a value falls within a range
#' @param value Number or vector of numbers
#' @param range Range of values in format \code{c(min, max)}
#' @export
#' @return Logical
#' @examples
#' inInterval(value = 1, range = c(-10,10))

inInterval <- function(value,
                       range){
  (findInterval(value, range ) == 1)
}