Im working on the following data :
# Time Series # Subset the M3 data to contain the relevant series ts.data<- subset(M3, 12)[[551]] print(ts.data)
