###Testing the Presence of Outliers in the Nile Data
nile <- as.zoo(Nile)
isat.nile <- isat(nile, sis=FALSE, iis=TRUE, plot=TRUE, t.pval=0.1)
outliertest(isat.nile)
###Testing the number of outliers when the sample is T=200,
### with 7 detected outliers at t.pval=0.05 if no isat object is provided:
outliertest(x=NULL, noutl=7, t.pval=0.05, T=200)
Run the code above in your browser using DataLab