CheckInterval: Monitorización de la fase longitudinal de la depuración...
In elisa-esteban/SelEditMonitor: Functions for selective editing

Description Usage Arguments Value Examples

CheckInterval obtiene los parámetros de la fase longitudinal de la depuración selectiva

1
2
3

CheckInterval(variables, units, edit.List, edits = names(edit.list), edData,
  rawData, edTS, intervalData, flagData, invTrans.List, dTrans.List,
  lang = "EN")

`variables`	`lista` con tres componentes: VarAnalisis, con los nombres de las variables implicadas en la contrucción de los controles de validación de la operación estadística considerada; VarAsociadas, con las variables que intervienen en el cálculo de cada variable de análisis y VarAuxiliares, con los nombres de aquellas variables que quieran incluirse en la salida de la función.
`units`	data.table con los identificadores de las unidades a monitorizar.
`edits`	`vector` de tipo `character` con los nombres de los controles de validación que se quieren consultar.
`edData`	objeto de clase `StQ` con los microdatos depurados de la encuesta para el periodo consultado.
`rawData`	objeto de clase `StQ` con los microdatos sin depurar de la encuesta para el periodo consultado.
`edTS`	objeto de clase `StQ` con los microdatos depurados de la encuesta utilizados para la construcción de los intervalos de validación del periodo de referencia especificado en Periodo.
`intervalData`	objeto de clase `StQ` con los datos del fichero FL obtenido en la fase longitudinal del periodo de referencia especificado en Periodo.
`flagData`	`lista` de data.table con la información de los ficheros de errores.
`invTrans.List`	`lista` con los nombres de las funciones inversas, si se ha hecho transformación (en otro caso con el valor NULL), para cada uno de los edits.
`dTrans.List`	`lista` con los nombres de las funciones derivadas, si se ha hecho transformación (en otro caso con el valor NULL), para cada uno de los edits.
`lang`	`vector` de tipo `character` y longitud uno con el idioma en que se quiere obtener la salida. Sus posibles valores son: 'EN' (English) y 'SP' (Servicio Promotor) y su valor por defecto es 'EN'.
`edit.list`	lista de vectores de tipo `character` con los nombres de los controles de validación de la operación estadística considerada.

La función devuelve una lista con dos componentes:

edTS: data.table con la serie de valores de las unidades para las variables implicadas en los edits.
edits: data.table con los intervalos de validación de cada Edit consultado y los parámetros utilizados en su construcción: Pred (centro del intervalo), Pred_error (error de predicción de la variable), HRFactor (factor de amplitud) y Condicion (indicador de la aplicación o no del control.)

dontrun{
Variables <- list(VarAnalisis = list(LCN = 'logv9' ,
                                     LEX = 'logvexis',
                                     LRCNPT = 'logRatioCNPT',
                                     LTACNCCAA = 'logitAngleCNCCAA',
                                     LTACNCNAE = 'logitAngleCNCNAE',
                                     LTAPTCCAA = 'logitAnglePTCCAA',
                                     LTACNPTCCAA = 'logitAngleCNPTCCAA'),
                  VarAsociadas = list(LCN = 'v9' ,
                                      LEX = 'vexis',
                                      LRCNPT = c('v9', 'vexis'),
                                      LTACNCCAA = c(vecCNCCAA, lagVecCNCCAA),
                                      LTACNCNAE = c(vecCNCNAE, lagVecCNCNAE),
                                      LTAPTCCAA = c(vecPTCCAA, lagVecPTCCAA),
                                      LTACNPTCCAA = c(vecCNCCAA, vecPTCCAA)),
                  VarAuxiliares = list(INCIDENC = 'incidenc'))
Suffixes <- c('W_1', 'W_3', 'noW_3')
Edit.List <- list(LCN = paste0('LCN_', Suffixes),
                  LEX = paste0('LEX_', Suffixes),
                  LRCNPT = paste0('LRCNPT_', Suffixes),
                  LTACNCCAA = paste0('LTACNCCAA_', Suffixes),
                  LTACNCNAE = paste0('LTACNCNAE_', Suffixes),
                  LTAPTCCAA = paste0('LTAPTCCAA_', Suffixes),
                  LTACNPTCCAA = paste0('LTACNPTCCAA_', Suffixes))  
                 
output <- CheckInterval(units = list(NOrden = '4602232599M'), 
                        edits = c('LCN','LTACNCNAE'), 
                        variables = Variables, 
                        edit.List = Edit.list, 
                        edData = FF.StQList[[Periodo]],
                        intervalData = FL.StQList)
}