# NOT RUN {
# example with two sets which as a union are the upper and lower case vowels.
set_a <- c("A", "a", "E", "I", "i", "O", "o", "U", "u", "E", "I")
set_b <- c("A", "a", "E", "e", "i", "o", "U", "u", "u", "a", "e")
set_diff(set_a, set_b)
set_diff(set_b, set_a)
# example
set_a <- 1:90
set_b <- set_a[-c(23, 48)]
set_diff(set_a, set_b)
set_diff(set_b, set_a)
# example
set_a <- c("A", "A", "B")
set_b <- c("B", "A")
set_diff(set_a, set_b)
# }
Run the code above in your browser using DataLab