R通过data.table中的运行来识别和分组