Usage
tsacfplots(x,
ylab=deparse(substitute(x)),
x.name=ylab[[1]],
main=paste("Series:", x.name),
lag.at=NULL,
lag.max=NULL,
lag.units=NULL,
lag.0=TRUE,
...)
acf.pacf.plot(x,
ylab=NULL,
series=deparse(substitute(x)),
main=paste("ACF and PACF:", series),
lag.max,
lag.units=frequency(x),
lag.at=pretty(apacf$lag),
lag.labels=lag.at*lag.units,
lag.0=TRUE,
...)