Check Set Ordered

Checks if the first occurrence of each shared element in x is equivalent to the first occurrence of each shared element in values using vld_equivalent(unique(x[x %in% values]), values[values %in% x]).

Usage

chk_orderset(x, values, x_name = NULL)

Arguments

x

The object to check.

values

A vector of the permitted values.

x_name

A string of the name of object x or NULL.

Value

The chk_ function throws an informative error if the test fails.

The vld_ function returns a flag indicating whether the test was met.

See also

Other chk_set: chk_join(), chk_not_subset(), chk_superset(), vld_not_subset(), vld_orderset()

Examples

# chk_orderset
chk_orderset(1:2, 1:2)
try(chk_orderset(2:1, 1:2))
#> Error in eval(expr, envir) : 
#>   `2:1` must have (the first occurence of) each of the following elements in the following order: 1, 2.