inst/scripts/lynx.q

ts.plot(lynx)
title("Canadian lynx trapping (1821-1934)")
pause()
cat("Data are now log-transformed\n")
log.lynx <- log(lynx)
sm.ts.pdf(log.lynx, lags=4:5)
pause()
sm.autoregression(log.lynx, maxlag=5, se=TRUE)
pause()
sm.autoregression(log.lynx, lags=cbind(4,5))

Try the sm package in your browser

Any scripts or data that you put into this service are public.

sm documentation built on May 29, 2024, 2:28 a.m.