R data.table按条件排序