Cacher is the code snippet organizer for pro developers

orig <- c('11', '22', '33', '44', '55')
search <- c('2', '5')
charmatch(search, orig)
orig[charmatch(search, orig)]