R语言gsub替换字符工具的具体使用