Inserir uma coluna com números sequenciais

dúvidas
1

No codigo abaixo gostaria de inserir uma coluna com numeros seguenciais a cada mudança em cyl.

No exemplo abaixo para cada cyl temos 4 linhas,
Então seria uma sequencia de 1,2,3,4 para cyl.

tentei com group_by + mutate e não consegui.

Alguém tem alguma ideia?

mtcars %>% 
    group_by(cyl) %>%    
    summarise(q = list(quantile(mpg))) %>% 
    unnest(q)

#> `summarise()` ungrouping output (override with `.groups` argument)
#> # A tibble: 15 x 2
#>      cyl     q
#>    <dbl> <dbl>
#>  1     4  21.4
#>  2     4  22.8
#>  3     4  26  
#>  4     4  30.4
#>  5     4  33.9
#>  6     6  17.8
#>  7     6  18.6
#>  8     6  19.7
#>  9     6  21  
#> 10     6  21.4
#> 11     8  10.4
#> 12     8  14.4
#> 13     8  15.2
#> 14     8  16.2
#> 15     8  19.2
3

Usando o mutate depois de group_by() dá certo para mim. a função n() ajuda nessa hora tbm, ó:

library(tidyverse)
mtcars %>% 
    group_by(cyl) %>%    
    mutate(q = 1:n())
#> # A tibble: 32 x 12
#> # Groups:   cyl [3]
#>      mpg   cyl  disp    hp  drat    wt  qsec    vs    am  gear  carb     q
#>    <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <int>
#>  1  21       6  160    110  3.9   2.62  16.5     0     1     4     4     1
#>  2  21       6  160    110  3.9   2.88  17.0     0     1     4     4     2
#>  3  22.8     4  108     93  3.85  2.32  18.6     1     1     4     1     1
#>  4  21.4     6  258    110  3.08  3.22  19.4     1     0     3     1     3
#>  5  18.7     8  360    175  3.15  3.44  17.0     0     0     3     2     1
#>  6  18.1     6  225    105  2.76  3.46  20.2     1     0     3     1     4
#>  7  14.3     8  360    245  3.21  3.57  15.8     0     0     3     4     2
#>  8  24.4     4  147.    62  3.69  3.19  20       1     0     4     2     2
#>  9  22.8     4  141.    95  3.92  3.15  22.9     1     0     4     2     3
#> 10  19.2     6  168.   123  3.92  3.44  18.3     1     0     4     4     5
#> # … with 22 more rows
1 curtida