assert_is_identical_to_true(TRUE)
assert_is_identical_to_false(FALSE)
assert_is_identical_to_true(c(truth = TRUE), allow_attributes = TRUE)
assert_is_identical_to_false(matrix(FALSE), allow_attributes = TRUE)
x <- c(TRUE, FALSE, NA)
is_true(x)
is_false(x)
assert_any_are_true(x)
assert_any_are_false(x)
#These tests should fail:
assert_is_true(c(truth = TRUE))
assert_is_false(matrix(FALSE))
assert_all_are_true(x)
assert_all_are_false(x)
Run the code above in your browser using DataLab