r语言将性别转化为01变量