assert_all_are_divisible_by {assertive.numbers} | R Documentation |
Checks to see if the input is divisible by some number.
assert_all_are_divisible_by(x, n, tol = 100 * .Machine$double.eps, na_ignore = FALSE, severity = getOption("assertive.severity", "stop")) assert_any_are_divisible_by(x, n, tol = 100 * .Machine$double.eps, na_ignore = FALSE, severity = getOption("assertive.severity", "stop")) assert_all_are_even(x, tol = 100 * .Machine$double.eps, na_ignore = FALSE, severity = getOption("assertive.severity", "stop")) assert_any_are_even(x, tol = 100 * .Machine$double.eps, na_ignore = FALSE, severity = getOption("assertive.severity", "stop")) assert_all_are_odd(x, tol = 100 * .Machine$double.eps, na_ignore = FALSE, severity = getOption("assertive.severity", "stop")) assert_any_are_odd(x, tol = 100 * .Machine$double.eps, na_ignore = FALSE, severity = getOption("assertive.severity", "stop")) is_divisible_by(x, n, tol = 100 * .Machine$double.eps, .xname = get_name_in_parent(x)) is_even(x, tol = 100 * .Machine$double.eps, .xname = get_name_in_parent(x)) is_odd(x, tol = 100 * .Machine$double.eps, .xname = get_name_in_parent(x))
x |
A numeric vector to divide. |
n |
A numeric vector to divide by. |
tol |
Differences from zero smaller than |
na_ignore |
A logical value. If |
severity |
How severe should the consequences of the assertion be?
Either |
.xname |
Not intended to be used directly. |
TRUE
if the input x
is divisible by n
, within
the specified tolerance.
is_even
and is_odd
are shortcuts for divisibility by two.
is_whole_number
is_divisible_by(1:10, 3) is_divisible_by(-5:5, -2) is_divisible_by(1.5:10.5, c(1.5, 3.5)) assert_any_are_even(1:10) assertive.base::dont_stop(assert_all_are_even(1:10))