## Not run: #takes a few seconds
# #lynx time series. ARp subset model.
# out<-FitAR(lynx, c(1,2,4,10,11), ARModel="ARp")
# BoxCox(out)
# #
# #lynx time series. ARz subset model.
# p<-SelectModel(lynx, ARModel="ARz", lag.max=25, Best=1)
# out<-FitAR(lynx, p)
# BoxCox(out)
# ## End(Not run)
Run the code above in your browser using DataLab