# NOT RUN {
supCount(c("abcde...", "abcd...", "abc...")) ## 5
x = c("doubled", "doubled", "aLongDummyString")
all( substr(x, 1, supCount(x)) == x )
## TRUE (no unique prefix due to duplicated entries)
# }
Run the code above in your browser using DataLab