powered by
lagplot(point.obj, pair.obj, a1, a2, lag=1, std=FALSE, query.a, xlim, ylim)
point()
pair()
a1
a2
point
pair
opar <- par(ask = interactive() && .Device == "X11") lagplot(maas.point,maas.pair,'zinc') # with identifying pairs: lagplot(maas.point,maas.pair,'zinc',lag=2,query.a='zinc') par(opar)
Run the code above in your browser using DataLab