> letters [1] "a" "b" "c" "d" "e" "f" "g" "h" "i" "j" "k" "l" "m" "n" "o" "p" "q" "r" "s" [20] "t" "u" "v" "w" "x" "y" "z" > A <- sample(letters,10) > A [1] "t" "y" "q" "r" "k" "i" "o" "s" "x" "g" > B <- sample(letters,15) > B [1] "b" "o" "q" "a" "t" "p" "e" "h" "v" "u" "c" "g" "n" "j" "x" > (p <- match(A,B)) [1] 5 NA 3 NA NA NA 2 NA 15 12 > (q <- match(B,A)) [1] NA 7 3 NA 1 NA NA NA NA NA NA 10 NA NA 9