Hi:
With a little reading between the lines on the help page, this appears to work:
data(Chem97, package = 'mlmRev')
p <- ggplot(Chem97, aes(sample = gcsescore))
p + stat_qq() + facet_wrap( ~ score) + ylab('gcsescore')
The problem with your code is that you tried to use ppoints(100), but
> table(Chem97$score)
0 2 4 6 8 10
3688 3627 4619 5739 6668 6681
and that's why you got the error message - your attempt at defining y used a fixed number of ppoints() but there was inequality in the sample sizes in each score subgroup, all of which were not equal to 100. Using geom_point() with my above code doesn't work either because there is no 'y' defined. Since Hadley mentioned on the stat_qq() help page that qplot/ggplot was 'smart' enough to do the right thing, I trusted his word and voila :)
HTH,
Dennis