Description Usage Arguments Value Examples
setAggrWeights
assigns a DDdt to the slot AggrWeights
of the input object.
1 2 3 4 5 6 7 | setAggWeights(object) <- value
## S4 replacement method for signature 'VNC,data.table'
setAggWeights(object) <- value
## S4 replacement method for signature 'DD,data.table'
setAggWeights(object) <- value
|
object |
Object whose slot |
value |
DDdt to be assigned to the slot |
Object with slot AggWeights updated.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 | ## Not run:
library(data.table)
MicroDataDD <- data.table(Variable = 'NewOrders', Sort = 'IDDD', Class = 'numeric',
Length = '8',
Qual1 = 'NumIdEst', Qual2 = 'Market', ValueRegExp = '')
VarList <- list(MicroData = data.table(IDQual = c('NumIdEst','','',''),
NonIDQual = c('', 'Market', 'Cod', ''),
IDDD = c('', '', '' ,'NewOrders'),
NumIdEst = c('', '', '', '.'),
Market = c('', '', '', '1.'),
Cod = rep('', 4),
UnitName = c('', '', '', 'cp02'),
InFiles = rep('FF', 4)))
VNC <- BuildVNC(VarList)
DD <- DD(VNC = VNC, MicroData = MicroDataDD)
AggWeights <- data.table(Variable = c('ID', 'Pond1'), Sort = c('IDQual', 'IDDD'),
Class = c('character', 'character'),
Length = c('11', '8'),
Qual1 = c('', 'ID'), ValueRegExp = c('', ''))
setAggWeights(DD) <- AggWeights
DD
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.