VE.Jk.EB.SW2.Corr.Hajek {samplingVarEst} | R Documentation |
The self-weighted two-stage sampling Escobar-Berger (2013) jackknife variance estimator for the estimator of a correlation coefficient using the Hajek point estimator
Description
Computes the self-weighted two-stage sampling Escobar-Berger (2013) jackknife variance estimator for the estimator of a correlation coefficient of two variables using the Hajek (1971) point estimator.
Usage
VE.Jk.EB.SW2.Corr.Hajek(VecY.s, VecX.s, VecPk.s, nII, VecPi.s,
VecCluLab.s, VecCluSize.s)
Arguments
VecY.s |
vector of the variable of interest Y; its length is equal to |
VecX.s |
vector of the variable of interest X; its length is equal to |
VecPk.s |
vector of the elements' first-order inclusion probabilities; its length is equal to |
nII |
the second stage sample size, i.e., the fixed number of ultimate sampling units selected within each cluster. Its size must be less than or equal to the minimum cluster size in the sample. |
VecPi.s |
vector of the clusters' first-order inclusion probabilities; its length is equal to |
VecCluLab.s |
vector of the clusters' labels for the elements; its length is equal to |
VecCluSize.s |
vector of the clusters' sizes; its length is equal to |
Details
For the population correlation coefficient of two variables and
:
the point estimator of , assuming that
is unknown (see Sarndal et al., 1992, Sec. 5.9), is:
where is the Hajek (1971) point estimator of the population mean
,
and with
denoting the inclusion probability of the
-th element in the sample
. If
is a self-weighted two-stage sample, the variance of
can be estimated by the Escobar-Berger (2013) jackknife variance estimator (implemented by the current function):
where ,
,
, with
denoting the sample elements from the
-th cluster,
is an indicator that takes the value
if the
-th observation is within the
-th cluster and
otherwise,
is the inclusion probability of the
-th cluster in the sample
,
is the size of the
-th cluster,
is the sample size within each cluster,
is the number of sampled clusters, and where
where and
have the same functional form as
but omitting the
-th cluster and the
-th element, respectively, from the sample
.
Note that this variance estimator implicitly utilises the Hajek (1964) approximations that are designed for large-entropy sampling designs, large samples, and large populations, i.e., care should be taken with highly-stratified samples, e.g. Berger (2005).
Value
The function returns a value for the estimated variance.
Author(s)
Emilio Lopez Escobar.
References
Berger, Y. G. (2005) Variance estimation with highly stratified sampling designs with unequal probabilities. Australian & New Zealand Journal of Statistics, 47, 365–373.
Escobar, E. L. and Berger, Y. G. (2013) A jackknife variance estimator for self-weighted two-stage samples. Statistica Sinica, 23, 595–613.
Hajek, J. (1964) Asymptotic theory of rejective sampling with varying probabilities from a finite population. The Annals of Mathematical Statistics, 35, 4, 1491–1523.
Hajek, J. (1971) Comment on An essay on the logical foundations of survey sampling by Basu, D. in Foundations of Statistical Inference (Godambe, V.P. and Sprott, D.A. eds.), p. 236. Holt, Rinehart and Winston.
Sarndal, C.-E. and Swensson, B. and Wretman, J. (1992) Model Assisted Survey Sampling. Springer-Verlag, Inc.
See Also
VE.Jk.Tukey.Corr.Hajek
VE.Jk.CBS.HT.Corr.Hajek
VE.Jk.CBS.SYG.Corr.Hajek
VE.Jk.B.Corr.Hajek
Examples
data(oaxaca) #Loads the Oaxaca municipalities dataset
s <- oaxaca$sSW_10_3 #Defines the sample to be used
SampData <- oaxaca[s==1, ] #Defines the sample dataset
nII <- 3 #Defines the 2nd stage fixed sample size
CluLab.s <- SampData$IDDISTRI #Defines the clusters' labels
CluSize.s <- SampData$SIZEDIST #Defines the clusters' sizes
piIi.s <- (10 * CluSize.s / 570) #Reconstructs clusters' 1st order incl. probs.
pik.s <- piIi.s * (nII/CluSize.s) #Reconstructs elements' 1st order incl. probs.
y1.s <- SampData$POP10 #Defines the variable y1
y2.s <- SampData$POPMAL10 #Defines the variable y2
x.s <- SampData$HOMES10 #Defines the variable x
#Computes the var. est. of the corr. coeff. point estimator using y1
VE.Jk.EB.SW2.Corr.Hajek(y1.s, x.s, pik.s, nII, piIi.s, CluLab.s, CluSize.s)
#Computes the var. est. of the corr. coeff. point estimator using y2
VE.Jk.EB.SW2.Corr.Hajek(y2.s, x.s, pik.s, nII, piIi.s, CluLab.s, CluSize.s)