Frekvenčná a kumulatívna frekvenčná krivka na rovnakom grafe v R - r, graf, ggplot2, frekvenčné rozloženie, kumulatívna frekvencia

Existuje nejaká cesta (v R s ggplot alebo inak) donakresliť krivky frekvencie a kumulatívnych frekvencií do jedného stĺpca (dva riadky), t. j. jeden vrchol druhého tak, aby daný kvartil mohol byť zobrazený na oboch krivkách pomocou priamych čiar? Dúfam, že o tom mám jasno ..

Tieto údaje môžete použiť ..

mydata<-structure(list(speed = c(10, 15, 20, 25, 30, 35, 40, 45, 50),frequency = c(0, 1, 5, 10, 20, 10, 6, 3, 0)), .Names = c("speed","frequency"), row.names = c(NA, -9L), class = "data.frame")

odpovede:

mydata<-structure(list(speed = c(10, 15, 20, 25, 30, 35, 40, 45, 50),frequency = c(0, 1, 5, 10, 20, 10, 6, 3, 0)), .Names = c("speed","frequency"), row.names = c(NA, -9L), class = "data.frame")


library(ggplot2)

qplot(data=mydata,
x=speed,
y=frequency,
geom=c("point", "line"))+
geom_line(aes(y=cumsum(frequency)))

alebo

Pridajte stĺpec kumulatívnej frekvencie

mydata$sum.freq<-with(mydata, cumsum(frequency))

library(reshape)
qplot(data=melt(mydata, id.vars="speed"),
x=speed,
y=value,
geom=c("point", "line"), facets=variable~.)