Digamos que eu tenha esse quadro de dados de exemplo

set.seed(12345)
n1 <- 3
n2 <- 10
n3 <- 60

times <- seq(0, 100, 0.5)

individual <- c(rep(1, n1), 
                rep(2, n2), 
                rep(3, n3))

events <- c(sort(sample(times, n1)),
            sort(sample(times, n2)),
            sort(sample(times, n3)))

df <- data.frame(individual = individual, events = events)

Que dá

> head(df, 10)
   individual events
1           1   72.0
2           1   75.5
3           1   87.5
4           2    3.0
5           2   14.5
6           2   16.5
7           2   32.0
8           2   45.5
9           2   50.0
10          2   70.5

Eu gostaria de plotar um gráfico de etapas cumulativo dos eventos para que eu receba uma linha por indivíduo, que aumenta em 1 cada vez que um evento é "encontrado".

Assim, por exemplo, o indivíduo 1 será 0 até 72,0, depois subirá para 1, até 75,5 quando se tornar 2 e até 3 a 87,5 para o final do gráfico.

Qual seria a maneira mais fácil de fazer isso?