check_subset() tests if the values of the chosen column c1 of data frame t1 are a subset of the values of column c2 of data frame t2.

check_subset(t1, c1, t2, c2)

## Arguments

t1 The data frame that contains column c1. The column of t1 that should only contain the values that are also present in column c2 of data frame t2. The data frame that contains column c2. The column of the second data frame that has to contain all values of c1 to avoid an error.

## Value

Returns t1, invisibly, if the check is passed. Otherwise an error is thrown and the reason for it is explained.

## Examples

data_1 <- tibble::tibble(a = c(1, 2, 1), b = c(1, 4, 1), c = c(5, 6, 7))
data_2 <- tibble::tibble(a = c(1, 2, 3), b = c(4, 5, 6), c = c(7, 8, 9))
# this is passing:
check_subset(data_1, a, data_2, a)

# this is failing:
try(check_subset(data_2, a, data_1, a))
#> # A tibble: 1 x 3
#>       a     b     c
#>   <dbl> <dbl> <dbl>
#> 1     3     6     9
#> Error : Column a of table data_2 contains values (see examples above) that are not present in column a of table data_1.