分配组ID从0开始，并在R中以1结束

您可以简单地在基本R中使用AVE：

使用（dt，ave（v1，c（0，cumsum（v1）[ - 长度（v1）]）），fun = seq_along））

＃[1] 1 2 3 4 1 2 3

或者，如果您在dplyr中也可以使用lag（），并且只需创建组，就可以在每个组中分配行号：

图书馆（dplyr）

dt％>％group_by（gr = lag（cumsum（v1），默认= 0））％>％突变（id = row_number（））