I have a vector with people names with a couple of millions long that I want to remove all characters but the first letter of each word (i.e. initials) and some characters s