Check if vector is constant

Check if vector is constant

Usage

is_constant(x, skip_missing = FALSE)

Arguments

x

Vector: Input

skip_missing

Logical: If TRUE, skip NA values before test

Value

Logical.

Author

EDG

Examples

x <- rep(9, 1000000)
is_constant(x)
#> [1] TRUE
x[10] <- NA
is_constant(x)
#> [1] FALSE
is_constant(x, skip_missing = TRUE)
#> [1] TRUE