Some sample data:
dfr <- data.frame( x = rep.int(1:10, 2), y = runif(20), g = factor(rep(letters[1:2], each = 10)) )
A simple scat
I don't think this is possible yet in ggplot2. This discussion from January suggests the issue is under consideration.