Sets up control object for (computation of textual sentiment and) aggregation into textual sentiment measures.
ctr_agg( howWithin = "proportional", howDocs = "equal_weight", howTime = "equal_weight", do.sentence = FALSE, do.ignoreZeros = TRUE, by = "day", lag = 1, fill = "zero", alphaExpDocs = 0.1, alphasExp = seq(0.1, 0.5, by = 0.1), do.inverseExp = FALSE, ordersAlm = 1:3, do.inverseAlm = TRUE, aBeta = 1:4, bBeta = 1:4, weights = NULL, tokens = NULL, nCore = 1 )
| howWithin | a single |
|---|---|
| howDocs | a single |
| howTime | a |
| do.sentence | see |
| do.ignoreZeros | a |
| by | a single |
| lag | a single |
| fill | a single |
| alphaExpDocs | a single |
| alphasExp | a |
| do.inverseExp | a |
| ordersAlm | a |
| do.inverseAlm | a |
| aBeta | a |
| bBeta | a |
| weights | optional own weighting scheme(s), used if provided as a |
| tokens | see |
| nCore | see |
A list encapsulating the control parameters.
For available options on how aggregation can occur (via the howWithin,
howDocs and howTime arguments), inspect get_hows. The control parameters
associated to howDocs are used both for aggregation across documents and across sentences.
Samuel Borms, Keven Bluteau
set.seed(505) # simple control function ctr1 <- ctr_agg(howTime = "linear", by = "year", lag = 3) # more elaborate control function (particular attention to time weighting schemes) ctr2 <- ctr_agg(howWithin = "proportionalPol", howDocs = "exponential", howTime = c("equal_weight", "linear", "almon", "beta", "exponential", "own"), do.ignoreZeros = TRUE, by = "day", lag = 20, ordersAlm = 1:3, do.inverseAlm = TRUE, alphasExp = c(0.20, 0.50, 0.70, 0.95), aBeta = c(1, 3), bBeta = c(1, 3, 4, 7), weights = data.frame(myWeights = runif(20)), alphaExp = 0.3) # set up control function with one linear and two chosen Almon weighting schemes a <- weights_almon(n = 70, orders = 1:3, do.inverse = TRUE, do.normalize = TRUE) ctr3 <- ctr_agg(howTime = c("linear", "own"), by = "year", lag = 70, weights = data.frame(a1 = a[, 1], a2 = a[, 3]), do.sentence = TRUE)