文档分类
# 计算预测值和真实值之间的相关性:#
cor(compute(model,m_test[1:7])$net.result, m_test$PROFIT)
数值预测:2016年4月18日7个变量的收盘数据
todaydata=read.table("C:/Users/lenovo/Desktop/today.txt",header=F) compute(model,todaydata)$net.result