Desejo criar um número seqüencial dentro de cada execução de valores iguais, como um contador de ocorrências, que é reiniciado quando o valor na linha atual é diferente da linha anterior.

Por favor, encontre um exemplo de entrada e saída esperada abaixo.

dataset <- data.frame(input = c("a","b","b","a","a","c","a","a","a","a","b","c"))
dataset$counter <- c(1,1,2,1,2,1,1,2,3,4,1,1)
dataset

#    input counter
# 1      a       1
# 2      b       1
# 3      b       2
# 4      a       1
# 5      a       2
# 6      c       1
# 7      a       1
# 8      a       2
# 9      a       3
# 10     a       4
# 11     b       1
# 12     c       1

Minha pergunta é muito semelhante a esta:Seqüência cumulativa de ocorrências de valores.