如何从R中的字符串向量中仅删除最后一个字符?