a <- c("a", "cat", "dog", "the", "the")
b <- c("corn", "a", "chicken", "the")
d <- c("house", "feed", "a", "the", "chicken")
common(a, b, d, overlap=2)
common(a, b, d, overlap=3)
r <- list(a, b, d)
common(r)
common(r, overlap=2)
common(word_list(DATA$state, DATA$person)$cwl, overlap = 2)
Run the code above in your browser using DataLab