R从字符串中删除最后一个字

I'm trying to do something but can't remember/find the answer. I have a list of city names from the Census Bureau and they put the city's type on the end which is messing up my I'm trying to do something but can't remember/f