a <- rnorm(90); b <- rexp(90)
windows(record=TRUE) # turn recording on
plot(a,b, las=1)
pointZoom(a,b)
# now scroll through the plots (Pg Up and Pg Dn) to unzoom again.
d <- data.frame(a,b)
class(d)
plot(d)
# pointZoom(d) # may not pass build check because of use of locator. Please remove the first "#"
Run the code above in your browser using DataLab