Function takes a character string as input and find the common and unique elements. Assumes that the common element is at start of string.
strCommonUnique(string)Character vector
list of common and unique strings
test <- c("Q_1", "Q_2", "Q_3")
strCommonUnique(test)$common
#> [1] "Q_"
strCommonUnique(test)$unique
#> [1] "1" "2" "3"