如何根据R数据框中多个数字列的标准对行进行子集?