如何基于多列创建 R 数据框的子集?