Displaying 2 results from an estimated 2 matches for "versource".
Did you mean:
oversource
2009 Jul 15
2
storing lm() results and other objects in a list
....ahead=modLength-modMax,newxreg=newmfReg)
forecast3.b <-predict(newFit3.b,n.ahead=modLength-modMax,newxreg=mfReg)
forecast4.b <-predict(newFit4.b,n.ahead=modLength-modMax,newxreg=newmfReg)
forecast5.b <-predict(newFit5.b,n.ahead=modLength-modMax,newxreg=newmfReg)
accuracy(forecast1.b$pred,verSource)
accuracy(forecast2.b$pred,verSource)
accuracy(forecast3.b$pred,verSource)
accuracy(forecast4.b$pred,verSource)
accuracy(forecast5.b$pred,verSource)
####### END SAMPLE #############
It's pretty clear I need to clean this up into a loop for each model
(as I like having an arbitrary number of m...
2009 Dec 03
0
Problem with predict() and factors
...a Time Series
#Prep Out-of-sample test ranges
modLength=length(sh1[[ENVNAME]])
modMax=round((modLength/3)*2)
modEndDate=time(tsSource)[modMax]
modStartDate=time(tsSource)[1]
#RAW SUMAMRY WITH OVERLAY OF OUT OF SAMPLE RANGES
summary(tsSource)
modelSource=window(tsSource,modStartDate,end=modEndDate)
verSource=window(tsSource,time(tsSource)[modMax+1])
pdf(paste("Q:/ReleaseMgmt/Environment
Mgmt/Data/Current/Metrics/Mainframe/Test Environment
Projections/RSTATS/images/",ENVNAME,"-",HOUR,"-","Raw Metrics with Test
Range.pdf",sep=""),width=9, height=6.5)
plot...