r语言如何检查一个char里面的字符数