getDotQual: Return non-unit qualifiers not used in compound variable...

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

Description

getDotQual returns a character vector with all qualifier names specified with a wildcard dot in the VNC component of the input object.

Usage

getDotQual(object, Component = names(object))

## S4 method for signature 'VNC'
getDotQual(object, Component = names(object))

## S4 method for signature 'DD'
getDotQual(object, Component = names(getVNC(object)))

## S4 method for signature 'StQ'
getDotQual(object, Component = names(getVNC(object)))

Arguments

object	Object containing the dot qualifiers.
Component	Character vector with the components or slots from which dot qualifiers are required.

Value

Character vector with all the dot qualifier names.

Examples

library(data.table)
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, FD, FG', 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('FA', 3)))
VNC <- BuildVNC(VarList)
getDotQual(VNC)

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