wg_calibra: calibra - grupo

View source: R/me.r

wg_calibraR Documentation

calibra - grupo

Description

Calibra las ponderaciones por grupo.

Usage

wg_calibra(dfo, dfg, cob = 1:3, cgr = 1:2, dec = 6L)

Arguments

dfo

data.frame: datos de las observaciones (vea detalles)

dfg

data.frame: datos de los grupos (vea detalles)

cob

numeric o character: posición (integer) o nombre (character) de las columnas con los datos de grupo, variable de calibración, ponderación (vea detalles); por omisión 1:3.

cgr

numeric o character: posición (integer) o nombre (character) de las columnas que identifican al grupo y el valor de la variable de calibración (vea detalles); por omisión 1:2

dec

integer: número de decimales en la ponderación; 6 por defecto

Details

Aplica la función w_calibra a datos agrupados, como, por ejemplo, cuando se calibran las ponderaciones por la superficie de los estratos (grupos) de un departamento.

El arg. "dfo" es el data.frame con las columnas de los datos de
la variable de calibración (p.ej. superficie), del grupo al que
pertenece el dato (p.ej. estrato) y de las ponderaciones
iniciales. La posición o nombre de esas columnas se pasa en el
arg. "cob" en el orden: grupo, variable calibración y
ponderación. El arg. "dfg" es el data.frame con los datos de
los grupos: una columna con el dato que identifica al grupo
(p.ej. estrato) y otra con el valor (total) de la variable de
calibración correspondiente al grupo (p.ej. superficie del
estrato). La posición o nombre de las columnas se pasa en el
arg. "cgr" en el orden: grupo, valor de la variable.

La función devuelve el arg. "dfo" con la columna adicional «wc»
en la que están los factores de calibración.

Value

numeric

Author(s)

eddy castellón

See Also

w_calibra

Examples

aa <- data.frame(x = 1:4, g = c("a", "a", "b", "b"),
                 w = c(1, 1, 1, 1.5))
bb <- data.frame(g = c("a", "b"), v = c(4, 10))
wc <- wg_calibra(aa, bb, cob = c(2, 1, 3), dec = 4)
tapply(wc$x * wc$w * wc$wc, wc$g, sum)

ecastellon/magest documentation built on Dec. 9, 2024, 7:44 p.m.