Checks if all non-missing values are greater than value using
all(x[!is.na(x)] > value)
Value
The chk_
function throws an informative error if the test fails or
returns the original object if successful so it can used in pipes.
The vld_
function returns a flag indicating whether the test was met.
Examples
# chk_gt
chk_gt(0.1)
try(chk_gt(c(0.1, -0.2)))
#> Error in eval(expr, envir) :
#> `c(0.1, -0.2)` must have values greater than 0.
# vld_gt
vld_gt(numeric(0))
#> [1] TRUE
vld_gt(0)
#> [1] FALSE
vld_gt(0.1)
#> [1] TRUE
vld_gt(c(0.1, 0.2, NA))
#> [1] TRUE
vld_gt(c(0.1, -0.2))
#> [1] FALSE
vld_gt(c(-0.1, 0.2), value = -1)
#> [1] TRUE
vld_gt("b", value = "a")
#> [1] TRUE