| 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.