E.WR: Estimation of the Population Total under Simple Random...
In psirusteam/TeachingSampling: Selection of Samples and Parameter Estimation in Finite Population

Description Usage Arguments Details Value Author(s) References See Also Examples

Computes the Hansen-Hurwitz estimator of the population total according to a simple random sampling with replacement design

1	E.WR(N, m, y)

`N`	Population size
`m`	Sample size
`y`	Vector, matrix or data frame containing the recollected information of the variables of interest for every unit in the selected sample

Returns the estimation of the population total of every single variable of interest, its estimated variance and its estimated coefficient of variation estimated under an simple random with replacement design

The function returns a data matrix whose columns correspond to the estimated parameters of the variables of interest

Hugo Andres Gutierrez Rojas hagutierrezro@gmail.com

Sarndal, C-E. and Swensson, B. and Wretman, J. (1992), Model Assisted Survey Sampling. Springer.
Gutierrez, H. A. (2009), Estrategias de muestreo: Diseno de encuestas y estimacion de parametros. Editorial Universidad Santo Tomas.

S.WR

# Uses the Lucy data to draw a random sample according to a WR design
data(Lucy)
attach(Lucy)

N <- dim(Lucy)[1]
m <- 400
sam <- S.WR(N,m)
# The information about the units in the sample is stored in an object called data
data <- Lucy[sam,]
attach(data)
names(data)
# The variables of interest are: Income, Employees and Taxes
# This information is stored in a data frame called estima
estima <- data.frame(Income, Employees, Taxes)
E.WR(N,m,estima)