BestTSPred: Seleccion de la mejor prediccion de un conjunto de modelos de...

In elisa-esteban/BestTSPred: Construction of objects of class BestTSPredParam

Description

BestTSPred Selecciona la mejor prediccion para una serie de tiempo de entre las proporcionadas por un conjunto de modelos.

Usage

BestTSPred(x, BestTSPredParam)

BestTSPred(x, BestTSPredParam)

## S4 method for signature 'vector'
BestTSPred(x, BestTSPredParam)

## S4 method for signature 'StQList'
BestTSPred(x, BestTSPredParam)

Arguments

x	vector u objeto de clase StQList, con las variables y los valores para los que obtendremos las predicciones.
BestTSPredParam	Objeto de clase BestTSPredParam con los parametros de los distintos modelos de prediccion de series temporales y las variables para las que se quieren obtener las predicciones.

Details

Este metodo toma como argumento de entrada el objeto x que contiene las variables que queremos predecir y selecciona la mejor prediccion de entre un conjunto de predicciones especificadas como input en el objeto de clase BestTSPredParam.

Value

data.table con componentes Pred y STD que contienen la mejor prediccion, para cada variable, de entre las especificadas en el objeto de entrada BestTSPredParam, y sus correspondientes desviaciones tipicas estimadas.

Examples

# Predicting one and two months ahead in time
data(Example1.TS)
TS.list <- list(Reg = list('RegDiffTSPred', forward = 2L),
                Stat = list('StatDiffTSPred', forward = 2L),
                StatReg = list('StatRegDiffTSPred', forward = 2L))
BestTSPredParam <- new(Class='BestTSPredParam', TSPred.list = TS.list)
BestTSPred(Example1.TS, BestTSPredParam)

## Not run: 
# With an object of class StQList
data(StQListExample)
VarNames <- c('ActivEcono_35._6._2.1.4._0', 'GeoLoc_35._6._2.1._1.2.5.')
StQList <- readRDS('../E30183.FF.StQList.rds')
Units <- StQ::getUnits(StQList[['MM102016']])
Units <- Units[sample(1:(dim(Units)[1]), 1000)]
data.table::setkeyv(Units, 'NOrden')
StQ::setUnits(StQList) <- Units
VarNames <- c('CifraNeg_13.___', 'Personal_07.__1._1._')
TS.list <- list(Reg = list('RegDiffTSPred', forward = 2L),
                Stat = list('StatDiffTSPred', forward = 2L),
                StatReg = list('StatRegDiffTSPred', forward = 2L),
                Arima = list('AutoArimaTSPred', forward = 2L))
BestTSPredParam <- new(Class='BestTSPredParam', TSPred.list = TS.list, VarNames = VarNames)
BestTSPred(StQListExample, BestTSPredParam)

## End(Not run)

elisa-esteban/BestTSPred documentation built on April 28, 2020, 3:57 a.m.