## scalar time series
ap <- pcts(AirPassengers)
nSeasons(ap) # 12
## multivariate time series
pcfr <- pcts(dataFranses1996)
nSeasons(pcfr) # 4
## five-day-week period
five_day_week <- BuiltinCycle(5)
five_day_week
nSeasons(five_day_week)
Run the code above in your browser using DataLab