# \donttest{
library(metan)
(A <- letters[1:4])
(B <- letters[2:5])
(C <- letters[3:7])
set_union(A, B)
set_intersect(A, B, C)
set_difference(B, C)
# Operations with data frames
# Add a row id for better understanding
sets <- data_ge %>% add_row_id()
set_1 <- sets[1:5,]
set_2 <- sets[2:6,]
set_3 <- sets[3:7,]
set_intersect(set_1, set_2, set_3)
set_difference(set_2, set_3)
set_union(set_1, set_2, set_3)
# }
Run the code above in your browser using DataLab