如何基于R数据帧中其他变量的条件创建带有二进制变量的列?