Checks if an argument is a logical scalar
Arguments
- arg
A function argument to be checked
- optional
Is the checked argument optional?
If set to
FALSE
andarg
isNULL
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_param()
,
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))
#> Error in assert_logical_scalar(flag) :
#> `flag` must be either `TRUE` or `FALSE` but is `NA`
try(example_fun(c(TRUE, FALSE, FALSE)))
#> Error in assert_logical_scalar(flag) :
#> `flag` must be either `TRUE` or `FALSE` but is a logical vector
try(example_fun(1:10))
#> Error in assert_logical_scalar(flag) :
#> `flag` must be either `TRUE` or `FALSE` but is an integer vector