Check if an object is an element of a given set
Usage
checkChoice(x, choices, null.ok = FALSE, fmatch = FALSE)
check_choice(x, choices, null.ok = FALSE, fmatch = FALSE)
assertChoice(
x,
choices,
null.ok = FALSE,
fmatch = FALSE,
.var.name = vname(x),
add = NULL
)
assert_choice(
x,
choices,
null.ok = FALSE,
fmatch = FALSE,
.var.name = vname(x),
add = NULL
)
testChoice(x, choices, null.ok = FALSE, fmatch = FALSE)
test_choice(x, choices, null.ok = FALSE, fmatch = FALSE)
expect_choice(
x,
choices,
null.ok = FALSE,
fmatch = FALSE,
info = NULL,
label = vname(x)
)Arguments
- x
[
any]
Object to check.- choices
[
atomic]
Set of possible values.- null.ok
[
logical(1)]
If set toTRUE,xmay also beNULL. In this case only a type check ofxis performed, all additional checks are disabled.- fmatch
[
logical(1)]
Use the set operations implemented infmatchin package fastmatch. If fastmatch is not installed, this silently falls back tomatch.fmatchmodifiesyby reference: A hash table is added as attribute which is used in subsequent calls.- .var.name
[
character(1)]
Name of the checked object to print in assertions. Defaults to the heuristic implemented invname.- add
[
AssertCollection]
Collection to store assertion messages. SeeAssertCollection.- info
[
character(1)]
Extra information to be included in the message for the testthat reporter. Seeexpect_that.- label
[
character(1)]
Name of the checked object to print in messages. Defaults to the heuristic implemented invname.
Value
Depending on the function prefix:
If the check is successful, the functions
assertChoice/assert_choice return
x invisibly, whereas
checkChoice/check_choice and
testChoice/test_choice return
TRUE.
If the check is not successful,
assertChoice/assert_choice
throws an error message,
testChoice/test_choice
returns FALSE,
and checkChoice/check_choice
return a string with the error message.
The function expect_choice always returns an
expectation.
Note
The object x must be of the same type as the set w.r.t. typeof.
Integers and doubles are both treated as numeric.
See also
Other set:
checkDisjunct(),
checkPermutation(),
checkSetEqual(),
checkSubset()
Examples
testChoice("x", letters)
#> [1] TRUE
# x is not converted before the comparison (except for numerics)
testChoice(factor("a"), "a")
#> [1] FALSE
testChoice(1, "1")
#> [1] FALSE
testChoice(1, as.integer(1))
#> [1] TRUE