如何将 xts 对象拆分成大小相似但连续而不是随机的块？

Question

我这样做了，但将系列分成随机块：块<- split(GC, f = 1:3)

考虑到索引中的日期，我需要连续的块。