如何解决如何按日期索引拆分XTS数据帧?
我通过结合各种XTS对象技术指标来创建数据框。
alldata_SBI <- data.frame(Ad(SBIN.NS),SMA50_SBI,SMA200_SBI,EMA50_SBI,EMA200_SBI,BB_SBI,Momentum_SBI,MACD_SBI,RSI_SBI,ROC_SBI,WPR_SBI)
colnames(alldata_SBI) <- c("ADJ.CLOSE","SMA50","SMA200","EMA50","EMA200","BB.DN","BB.MAVG","BB.UP","BB.PCTB","MOMENTUM","MACD","MACD.SIGNAL","RSI","ROC","WPR")
我看到数据框具有日期索引。
我注意到此日期索引是自动创建的,可能是因为我组合了XTS对象,所以索引也会随之出现。
现在,我想将此数据框分成以下两个不同的训练和测试集
火车
测试
我该如何实现?
解决方法
如果您将数据保留在xts对象中,而不是data.frame中,则容易得多。
假设您的数据仍在xts对象中
alldata_sbi <- merge(Ad(SBIN.NS),SMA50_SBI,SMA200_SBI,EMA50_SBI,EMA200_SBI,BB_SBI,Momentum_SBI,MACD_SBI,RSI_SBI,ROC_SBI,WPR_SBI)
train <- alldata_sbi["2015-01-01/2018-12-31"]
test <- alldata_sbi["2019-01-01/2019-12-31"]
# alternatively,you only need to specify the smallest period you need
train <- alldata_sbi["2015/2018"] # all obs in 2015-2018
test <- alldata_sbi["2019"] # all obs in 2019
现在,您可以根据需要将train
和test
转换为data.frames。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。