## Do not run
## It could take a few seconds
# \donttest{
data(volumes)
pmean<-permest(t(volumes),24, 0.05, NaN,'volumes', pp=0)
xd=pmean$xd
estimators<-perYW(volumes,24,2,NaN)
parmaresid(xd, 0, estimators$del, estimators$phi)
# }
Run the code above in your browser using DataLab