Я хочу посчитать порядок для каждого элемента вектора

Question

У меня есть фрейм данных со структурой, подобной этой:

       id   patch   pot       
        1    A       A1        
        1    A       A1        
        1    A       A3        
        1    A       A1        
        1    A       A7        
        1    B       B1        
        1    B       B2        
        2    B       B9        
        2    B       B8        
        2    C       C1        

И я хочу получить "порядок" каждого банка в патче, но отдельно для каждого идентификатора:

   id   patch   pot       order
    1    A       A1        1
    1    A       A1        1
    1    A       A3        3
    1    A       A1        4
    1    A       A7        5
    1    B       B1        1
    1    B       B2        2
    2    B       B9        1
    2    B       B8        2
    2    C       C1        1

Я пытался использовать функции lapply и sapply, но, к сожалению, я не в состоянии справиться с этим. Любая идея, пожалуйста?