如何从R中的字符串中提取字符?