如何在R中分隔带有特殊字符的字符串?