Ich habe zwei Dichtekurven, die folgendermaßen dargestellt werden:

Network <- Mydf$Networks
quartiles <-  quantile(Mydf$Avg.Position,  probs=c(25,50,75)/100)
density <- ggplot(Mydf, aes(x = Avg.Position, fill = Network))
d <- density + geom_density(alpha = 0.2) + xlim(1,11) + opts(title = "September 2010") + geom_vline(xintercept = quartiles, colour = "red")
print(d)

Ich möchte die Fläche unter jeder Kurve für einen bestimmten Durchschn.Positionsbereich berechnen. Art wie Pnorm für die normale Kurve. Irgendwelche Ideen