assert_logical_scalar {admiraldev}

Is an Argument a Logical Scalar (Boolean)?

Description

Checks if an argument is a logical scalar

Usage

assert_logical_scalar(arg, optional = FALSE)

Arguments

arg

A function argument to be checked

optional

Is the checked argument optional?

If set to FALSE and arg is NULL then an error is thrown. Otherwise, NULL is considered as valid value.

Value

The function throws an error if arg is neither TRUE or FALSE. Otherwise, the input is returned invisibly.

See Also

Checks for valid input and returns warning or errors messages: assert_atomic_vector(), assert_character_scalar(), assert_character_vector(), assert_data_frame(), assert_date_vector(), assert_expr_list(), assert_expr(), assert_filter_cond(), assert_function(), assert_integer_scalar(), assert_list_element(), assert_list_of(), assert_named(), assert_numeric_vector(), assert_one_to_one(), assert_param_does_not_exist(), assert_s3_class(), assert_same_type(), assert_symbol(), assert_unit(), assert_vars(), assert_varval_list()

Examples

example_fun <- function(flag) {
  assert_logical_scalar(flag)
}

example_fun(FALSE)

try(example_fun(NA))

try(example_fun(c(TRUE, FALSE, FALSE)))

try(example_fun(1:10))