to.weekly(x) to.monthly(x) to.quarterly(x)
x <- fts() to.weekly(x) to.monthly(x) to.quarterly(x)
Run the code above in your browser using DataCamp Workspace