## Examples rely on locator, so can't be checked in non-interactive R use.
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)
Run the code above in your browser using DataLab