如何按行最大值划分 R 中的 data.table 对象行?