| assert_logical_scalar | R Documentation |
Checks if an argument is a logical scalar
assert_logical_scalar(
arg,
optional = FALSE,
arg_name = rlang::caller_arg(arg),
message = NULL,
class = "assert_logical_scalar",
call = parent.frame()
)
arg |
A function argument to be checked
|
optional |
Is the checked argument optional?
|
arg_name |
string indicating the label/symbol of the object being checked.
|
message |
string passed to
|
class |
Subclass of the condition. |
call |
The execution environment of a currently running
function, e.g. You only need to supply Can also be For more information about error calls, see Including function calls in error messages. |
The function throws an error if arg is neither TRUE or FALSE. Otherwise,
the input is returned invisibly.
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(),
assert_expr_list(),
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()
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))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.