R: Does the input have the specified attributes?

assert_has_all_attributes {assertive.properties}

R Documentation

Does the input have the specified attributes?

Description

Checks to see if the input has the specified attributes.

Usage

assert_has_all_attributes(x, attrs, severity = getOption("assertive.severity",
  "stop"))

assert_has_any_attributes(x, attrs, severity = getOption("assertive.severity",
  "stop"))

has_attributes(x, attrs, .xname = get_name_in_parent(x))

Arguments

`x`	Input to check.
`attrs`	Desired attributes.
`severity`	How severe should the consequences of the assertion be? Either `"stop"`, `"warning"`, `"message"`, or `"none"`.
`.xname`	Not intended to be used directly.

Value

has_attributes returns TRUE where x has the attributes specified in attrs. assert_has_terms returns nothing but throws an error if has_terms is not TRUE.

Examples

# has_attributes is vectorized on attrs
has_attributes(sleep, c("class", "names", "row.names", "col.names"))

# You can check for any or all of these attributes to be present.
x <- structure(c(a = 1), b = 2)
assert_has_all_attributes(x, c("names", "b"))
assert_has_any_attributes(x, c("names", "not an attribute"))

# These examples should fail.
assertive.base::dont_stop({
assert_has_all_attributes(x, c("names", "not an attribute"))
})