Extract characters that differ between two strings

Question

I have used adist to calculate the number of characters that differ between two strings:

a <- \"Happy day\"
b <- \"Tappy Pay\"
adist(a,b)          


        

Answer 1

You can use the following sequence of operations:

• split the string using strsplit().
• Use setdiff() to compare the elements
• Wrap in a reducing function

Try this:

Reduce(setdiff, strsplit(c(a, b), split = ""))
[1] "H" "d"