Function for finding non-identical elements in two vectors

Question

A simple question, but did not find it in stackoverflow. Is there a function to find all non-identical values:

x <- c("a","b","c","d") y <- c("a","f","g","c","d") 

the result should be:

 res <- c("b","f","g") 

All functions work only for one vector. setdiff() etc.

Answer 1

This appeared on the Tony Breyal blog a few years ago, you can see several solutions there, here is the shortest:

 c(setdiff(x,y),setdiff(y,x)) 

Answer 2

 setdiff(union(x, y), intersect(x, y)) 

Answer 3

Longhand Form:

 c(x[!x %in% y],y[!y %in% x]) #[1] "b" "f" "g"