getNonIDQual: Return non-unit qualifiers from an object

In david-salgado/StQ: Tools to manage metadata-incorporated key-value pair datasets

Description

getNonIDQual returns a character vector with all non-unit qualifier names (NonIDQual) contained in the input object.

Usage

getNonIDQual(object, CompNames = names(object))

## S4 method for signature 'VNC'
getNonIDQual(object, CompNames = names(object))

## S4 method for signature 'DD'
getNonIDQual(object, CompNames = setdiff(names(object), "VNC"))

## S4 method for signature 'StQ'
getNonIDQual(object, CompNames = setdiff(names(getDD(object)), "VNC"))

## S4 method for signature 'StQList'
getNonIDQual(object, CompNames = names(object))

Arguments

object	Object with the non-unit variable qualifiers (NonIDQual) to be queried.
CompNames	Character vector with the components or slots from which NonIDQuals are queried.

Details

Non-unit qualifiers are those qualifiers used to compose statistical variable names.

Value

Character vector with all the non-unit qualifier names.

Examples

# An example:
library(data.table)
### We build the VNC object
VarList <- list(ID = data.table(IDQual = c('NumIdEst', rep('', 4)),
                                NonIDQual = c('','','','',''),
                                IDDD = c('', 'Name', 'Surname', 'PostalAddr', 'PhoneNo'),
                                NumIdEst = c('', rep('.', 4)),
                                UnitName = c('numidest', 'nombre', 'apellidos', 'direccion', 'telefono'),
                                InFiles = rep('FI', 5)),
MicroData = data.table(IDQual = c('NumIdEst', rep('', 2)),
                       NonIDQual = c('', 'Market', ''),
                       IDDD = c(rep('', 2), 'NewOrders'),
                       NumIdEst = c(rep('', 2), '.'),
                       Market = c(rep('', 2), '1.'),
                       UnitName = c('numidest', '', 'cp09'),
                       InFiles = rep('FF', 3)),
ParaData = data.table(IDQual = c('NumIdEst', rep('', 2)),
                      NonIDQual = c('', 'Action', ''),
                      IDDD = c(rep('', 2), 'Date'),
                      NumIdEst = c(rep('', 2), '.'),
                      Action = c(rep('', 2), 'Imputation'),
                      UnitName = c('numidest', '', 'FechaImput'),
                      InFiles = rep('FP', 3)),
AggWeights = data.table(IDQual = c('CCAA', 'NACE09', ''),
                        NonIDQual = rep('', 3),
                        IDDD = c('', '', 'Ponderacion'),
                        CCAA = c('', '', '.'),
                        NACE09 = c('', '', '.'),
                        UnitName = c('Provincia', '', ''),
                        InFiles = rep('FF', 3)))

VNC <- BuildVNC(VarList)

getNonIDQual(VNC)

getNonIDQual(ExampleDD)
getNonIDQual(ExampleDD, 'MicroData')

getNonIDQual(ExampleStQ)
getNonIDQual(ExampleStQ, 'Aggregates')

david-salgado/StQ documentation built on Aug. 12, 2021, 3:23 p.m.