crossVal
in Package crossVal
in package ## S3 method for class 'ts':
crossVal(object, x12Parameter, x12BaseInfo,
showCI=FALSE, main="Cross Validation",
col_original="black", col_fc="#2020ff", col_bc="#2020ff",
col_ci="#d1d1ff", col_cishade="#d1d1ff",
lty_original=1, lty_fc=1, lty_bc=1, lty_ci=1,
lwd_original=1, lwd_fc=1, lwd_bc=1, lwd_ci=1, ytop=1,
points_bc=FALSE, points_fc=FALSE, points_original=FALSE,
showLine=TRUE, col_line="grey", lty_line=3,
ylab="Value", xlab="Date")
## S3 method for class 'x12Single':
crossVal(object, x12BaseInfo=new("x12BaseInfo"),
showCI=FALSE, main="Cross Validation",
col_original="black", col_fc="#2020ff", col_bc="#2020ff",
col_ci="#d1d1ff", col_cishade="#d1d1ff",
lty_original=1, lty_fc=1, lty_bc=1, lty_ci=1,
lwd_original=1, lwd_fc=1, lwd_bc=1, lwd_ci=1, ytop=1,
points_bc=FALSE, points_fc=FALSE, points_original=FALSE,
showLine=TRUE, col_line="grey", lty_line=3,
ylab="Value", xlab="Date")
ts
or x12Single-class
.x12Parameter
.x12BaseInfo
.ylim
.showLine
.showLine
.crossValidation-class
.X12
,
plot
,
plotSpec
,
plotSeasFac
,
plotRsdAcf
s <- new("x12Single",ts=AirPassengers,tsName="air")
s <- setP(s,list(estimate=TRUE,regvariables="AO1950.1",outlier="all",critical=list(LS=3.5,TC=2.5),
backcast_years=1/2,forecast_years=1))
cv<-crossVal(s,showLine=TRUE)
cv
Run the code above in your browser using DataLab