# NOT RUN {
aa1 = list(`1` = c("g", "a", "p", "v", "m", "l", "i"),
`2` = c("k", "h"),
`3` = c("d", "e"),
`4` = c("f", "r", "w", "y", "s", "t", "c", "n", "q"))
full2simple(aa1)
# }
Run the code above in your browser using DataLab