On Sun, Jul 20, 2008 at 11:14 PM, Gabor Grothendieck <ggrothendieck at gmail.com> wrote: > Try lattice: > > library(lattice) > xyplot(y ~ x, ylim = c(0.5, 0.7), aspect = "iso") Alternatively, set.seed(42) x <- runif(10) y <- runif(10) plot(x[(y>=0.5) & (y<=0.7)],y[(y>=0.5) & (y<=0.7)],ylim=c(0.5,0.7),asp=1) Paul