1d:T7c2,# `loadP` and `saveP` Functions `loadP` and `saveP` load and save parameter settings. methods ## Methods - **`signature(object = "x12Batch")`**: - **`signature(object = "x12Parameter")`**: - **`signature(object = "x12Single")`**: ```r ## S4 method for signature 'x12Single' loadP(object, file) ## S4 method for signature 'x12Batch' loadP(object, file) ## S4 method for signature 'x12Parameter' loadP(object, file) ## S4 method for signature 'x12Single' saveP(object, file) ## S4 method for signature 'x12Batch' saveP(object, file) ## S4 method for signature 'x12Parameter' saveP(object, file) ``` ## Arguments - `object`: object of class `x12Single-class`, `x12Batch-class` or `x12Parameter-class`. - `file`: filepath ## Examples ```r ## Not run: #Create new batch object with 4 time series and change some parameters xb <- new("x12Batch",list(AirPassengers,AirPassengers,AirPassengers,AirPassengers)) xb <- setP(xb,list(automdl=FALSE)) xb <- setP(xb,list(arima.model=c(1,1,0),arima.model=c(1,1,0)),1) xb <- setP(xb,list(arima.model=c(0,1,1),arima.smodel=c(0,1,1)),2) xb <- setP(xb,list(arima.model=c(0,1,1),arima.smodel=c(1,1,1)),3) xb <- setP(xb,list(arima.model=c(1,1,1),arima.smodel=c(1,1,1)),4) #save all parameters saveP(xb,file="xyz.RData") xb1 <- new("x12Batch",list(AirPassengers,AirPassengers,AirPassengers,AirPassengers)) #load all parameters and save it to the corresponding series inside a x12Batch-object xb1 <- loadP(xb1,file="xyz.RData") xs <- new("x12Single",ts=AirPassengers) xs <- setP(xs,list(arima.model=c(2,1,1),arima.smodel=c(2,1,1))) #Save the parameters saveP(xs,file="xyz1.RData") #Load a saved parameter set to a x12Single object xs <- new("x12Single",ts=AirPassengers) xs <- loadP(xs,file="xyz1.RData") #Replace all parameters in a x12Batch object with one parameter set xb <- new("x12Batch",list(AirPassengers,AirPassengers,AirPassengers,AirPassengers)) xb <- loadP(xb,file="xyz1.RData") ## End(Not run) ``` ## See Also `x12`, `x12Batch`

loadP-methods function