随机抽取R中的时间序列样本

Question

我有一些资产回报：

library(quantmod)
getSymbols("^GSPC")
ret<-ROC(Cl(GSPC[,4]))

为了我的测试目的，我需要两个时间顺序的时间段，例如2007-2009天的所有回报，然后是2011年至今的所有回报，但我需要随机抽样。