You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
plot(Air_otl_x12,original=TRUE,trend=TRUE,sa=TRUE,showAllout=TRUE,main="AirPassengers_otl",points_original=TRUE)
Error in showAllout && object@dg$outlier == "-" && object@dg$autoout == :
'length = 2' in coercion to 'logical(1)'
Warning message:
In par(gp) : graphical parameter "page" cannot be set
The text was updated successfully, but these errors were encountered:
There seems to be a problem with the plot function if more than 1 outlier is detected
AirPassengers_otl <- AirPassengers
AirPassengers_otl[c(130,144)] <- 800
Air_otl_x12 <- new("x12Single",ts=AirPassengers_otl)
Air_otl_x12 <- setP(Air_otl_x12,list(transform.function="auto", #transform.adjust="lpyear", automdl=TRUE, automdl.acceptdefault=TRUE, estimate=TRUE, estimate.outofsample=TRUE, check=TRUE, outlier.types="all", #regression.aictest="easter", #regression.variables="lpyear", x11.sigmalim=c(2,3), x11.calendarsigma="all", #x11.excludefcst=TRUE, #x11.trendma=5, #x11.seasonalma="s3x3", x11.final="user", x11.appendfcst=TRUE))
Air_otl_x12 <- x12(Air_otl_x12)
summary(Air_otl_x12)
plot(Air_otl_x12,original=TRUE,trend=TRUE,sa=TRUE,showAllout=TRUE,main="AirPassengers_otl",points_original=TRUE)
The text was updated successfully, but these errors were encountered: