Is object a scalar logical vector

Returns TRUE if x is a scalar logical (logical vector of length 1).

Usage

is_scalar_logical(x)

Arguments

x

The object to be tested.

Value

Scalar logical

Examples

#----------------------------------------------------------------------------
# is_scalar_logical() examples
#----------------------------------------------------------------------------
library(bkbase)

# TRUE
is_scalar_logical(TRUE)
#> [1] TRUE
is_scalar_logical(FALSE)
#> [1] TRUE
is_scalar_logical(NA)
#> [1] TRUE

# FALSE
is_scalar_logical(c(TRUE, FALSE))
#> [1] FALSE
is_scalar_logical(logical(0L))
#> [1] FALSE
is_scalar_logical(1L)
#> [1] FALSE
is_scalar_logical(NULL)
#> [1] FALSE