# NOT RUN {
# Create a time sequence of 30 min sample period
tseq <- seq(ct("2019-01-01"), ct("2019-02-01 12:00"), by=1800)
# Make the three hourly periodic sequence
make_periodic(tseq, 1:10, 3*3600)
# With an offset of one hour
make_periodic(tseq, 1:10, 3*3600, 3600)
# }
Run the code above in your browser using DataLab