ggplot으로 계단 단계 함수를 그리는 방법은 무엇입니까?

나는 이런 그래프를 가지고있다 :

그것을 생성하기위한 R 코드는 다음과 같습니다.

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")

나는 이런 것을 원한다.

차이점은 실패의 경우 단계의 형태입니다 (사각형 필요).

내 질문은 :

• ggplot2로 이것을 달성하는 방법?
• 수행 된 시간 / 반복에 따른 실패율을 시각화하는 더 나은 옵션이 있습니까?
• 이해하기 쉬운 변형 : 이것 또는 저것 , 아니면 다른 것?

@chl에서 언급했듯이 위의 예제에서 geom_path () 대신 geom_step ()을 사용하는 것입니다.

결과 (플롯에 다른 데이터가 있음) :