R语言 判断空字符串“”