I\'m working on speech transcriptions with phonologically reduced forms:
reduced <- c("in n it", "du n no", "dun n it", "wan