Como plotar uma função de degraus da escada com o ggplot?

Eu tenho o gráfico assim:

O código R para gerá-lo é:

DF <- data.frame(date = as.Date(runif(100, 0, 800),origin="2005-01-01"), 
                 outcome = rbinom(100, 1, 0.1))
DF <- DF[order(DF$DateVariable),] #Sort by date
DF$x <- seq(length=nrow(DF)) #Add case numbers (in order, since sorted)
DF$y <- cumsum(DF$outcome)
library(ggplot2)
ggplot(DF, aes(x,y)) + geom_path() + #Ploting
scale_y_continuous(name= "Number of failures") +
scale_x_continuous(name= "Operations performed")

Eu quero algo como isto:

A diferença está na forma de etapas em caso de falha (eu preciso retangular).

Minhas perguntas são:

• Como conseguir isso com o ggplot2?
• Existe alguma opção melhor para visualizar a taxa de falhas ao longo do tempo / iterações realizadas?
• Que variante é mais fácil de entender: isto ou aquilo ou, talvez algo diferente?

Conforme observado por @chl, a resposta é simplesmente usar geom_step () em vez de geom_path () no exemplo acima.

Resultado (o gráfico possui dados diferentes):