+ - 0:00:00
Notes for current slide
Notes for next slide

Empirical Bayes small area prediction

under a zero-inflated lognormal model
with correlated random effects

Xiaodan Lyu

Joint work with Dr.Emily Berg

04 February 2020

1 / 20

Basic Setting

  • Predictions for small domains are our primary interest.

    • Standard survey estimators are often unreliable given small sample sizes. (Rao, Molina, 2015)

    • Use model to incorporate auxiliary information (known for the whole population).

2 / 20

Basic Setting

  • Predictions for small domains are our primary interest.

    • Standard survey estimators are often unreliable given small sample sizes. (Rao, Molina, 2015)

    • Use model to incorporate auxiliary information (known for the whole population).

  • Data motivation (CEAP RUSLE2)

    • skewed data with heavy zeros

    • potential correlation between the positive part and the binary part

2 / 20

area mean, quantiles around 15% zeros skewed income data, wine production

Data Model

Suppose response variable yij,i=1,..,D;j=1,..,Ni satisfies yij=yijδij

  • Positive part: log(yij)=β0+z1,ijβ1+ui+eij where eiji.i.dN(0,σe2).

  • Binary part: Pr(δij=1)=pij, g(pij)=α0+z2,ijα1+bi where g() is the parametric link function to be specified.

3 / 20

Data Model

  • Lognormal extension

    • Mathematically tractable and computationally simple.

    • SAE lognormal model - Berg and Chandra (2013).

    • SAE zero-inflated lognormal - Lyu (2018).

  • Correlated random effects

    • (uibi)iidBVN(0,Σub),Σub=(σu2ρσuσbρσuσbσb2)

    • "plug-in" approach of Chandra, Chambers (2016) => implicitly assume independence

    • Bayesian approach of Pfeffermann et al (2018) => requires specifying prior distributions

4 / 20

linear mixed model used for the positive part

Empirical Bayes general

The minimum mean squared error (MMSE) predictor of ζi=1Nij=1Niyij is ζ^iMMSE=1Ni{jsiyij+js¯iy^ijMMSE} where y^ijMMSE=Eθ(yij|ysi)

Let θ^ be a consistent estimator of model parameter θ. ζ^iEB=1Ni{jsiyij+js¯iy^ijEB} where y^ijEB=y^ijMMSE(θ^)

5 / 20

We replace the true θ with an estimator to obtain the EB predictor nonsampled units s¯i

Conditional Distribution

Result 1:

ui|bi,ysiN(μ~ui,σ~ui2) where μ~ui=γir~¯i+(1γi)[ρσuσbbi],σ~ui2=γiσe2/n~i and γi=(1ρ2)σu2[(1ρ2)σu2+σe2/n~i]1,n~i=jsiδij, r~¯i=n~i1jsiδij{log(yij)β0z1,ijβ1}

Remark: when ρ=0, γi=σu2/(σu2+σe2/n~i), ui|ysiN(γir~¯i,γiσe2/n~i).

6 / 20

Conditional Distribution (Cont'd)

Result 2:

f(bi|ysi)πsi(bi)ϕ(bimivi) where ϕ() is the probability density function of standard normal distribution, πsi(bi)=jsi[pijδij+(1pij)(1δij)] and pij(bi)=g1(α0+α1zij+bi). (mi,vi)=(ρσuσbσu2+σe2/n~ir~¯i,1ρ21(1γi)ρ2σb2). Remark: when ρ=0, (mi,vi)=(0,σb2).

7 / 20

Conditional Distribution (Cont'd)

Result 3:

E(yij|ysi,θ)=hij(θ)E(pij(bi)η(bi)|ysi) where hij(θ)=exp(β0+xijβ1+γir~¯i+σ~ui2/2+σe2/2) and η(bi)=exp((1γi)ρσu/σbbi).


👉 y^ijEB=E(yij|ysi,θ^)


Remark: The proposed predictor can accommodate any parametrized link (transformation) function for the positive part and the binary part.

8 / 20

Parameter Estimation

Given ρ0, how to get a consistent estimator for model parameter θ=(β,α,σu2,σb2,σe2,ρ)? 😣

9 / 20

Parameter Estimation

Given ρ0, how to get a consistent estimator for model parameter θ=(β,α,σu2,σb2,σe2,ρ)? 😣

Full likelihood function: Li(θ)=(1γi)1/2(vi/σb2)1/2(2πσe2)n~i/2exp(γir~¯i22σe2/n~i+mi22vijr~ij22σe2)πsi(bi)1viϕ(bimivi)dbi Remark:

  • A good starting value and the gradient vector L/θ help optim find the optimizer much faster. ✌️

  • Profiling out ρ takes much longer time to find the MLE.

9 / 20

first approach also allows inference for simultaneous confidence interval or hypothesis test

MSE Estimator

Formally, the MSE of an EB predictor is MSE(ζ^iEB)=M1i(θ)+M2i(θ) where M1i(θ)=E(ζ^iMMSEζi)2=O(1), as D and M2i(θ)=E(ζ^iEBζ^iMMSE)2=o(1), as D Recall that ζ^iMMSE=E[ζi|ysi,θ],ζ^iEB=E[ζi|ysi,θ^]

10 / 20

M2i(θ) results from the parameter estimation process.

MSE Estimator (Cont'd)

So the MSE of the optimal predictor is M1i(θ)=E(E[ζi|ysi,θ]ζi)2=E[V(ζi|ysi,θ)] We propose a One-Step MSE estimator defined by V(ζi|ysi,θ^)=1Ni2js¯iks¯i[E{yijyik|ysi,θ^}E{yij|ysi,θ^}E{yik|ysi,θ^}] where E{yijyik|ysi}=hijhikexp(σ~ui2)E[pijpikη(2bi)|ysi],jk and E{yijyik|ysi}=hij2exp(σ~ui2+σe2)E[pijη(2bi)|ysi],j=k

11 / 20

Alternate MSE Estimators

  • Denote original parameter estimate θ^, bootstrap population Y(b), bootstrap sample y(b), parameter estimate θ^(b)

  • For b=1,,B, we obtain Y(b)y¯Ni(b) y(b),θ^y¯^Ni(b)MMSE y(b),θ^(b)y¯^Ni(b)EB

  1. MSE^iBoot=B1b=1B(y¯^Ni(b)EBy¯Ni(b))2

  2. MSE^iSemi-Boot=M^1i+M^2iBoot where a bootstrap estimator of M2i is defined by M^2iBoot=B1b=1B(y¯^Ni(b)EBy¯^Ni(b)MMSE)2

12 / 20

Simulation Setting

  • Number of areas: D=60

  • Sample rate: (Ni,ni)=(71,5),(143,10),(286,20) for every 20 areas so that (N,n)=(10000,700)

  • logit link for the binary part

  • One-dimensional covariates: zijN(4.45,0.055)

  • β=(13,2),α=(20,5), (σu2,σe2,σb2)=(0.22,1.23,0.52)

  • ρ{0.9,0.6,0.3,0,0.3,0.6,0.9}

  • Compare the proposed EB predictor with the EB(0) predictor ζ^iEBρ=0

Remark: the EB(0) predictor (Lyu 2018) is based on θ^0 obtained from fitting the two parts separately

13 / 20

Simulation Results

RDMSEi=MSE(ζ^iEB(0))MSE(ζ^iEB)MSE(ζ^iEB)

Table 1. Relative difference of MSE of the EB(0) predictor
compared with the EB predictor based on 1000 simulations.
14 / 20

Simulation Results

RBMSEi=MSE^iMSE(ζ^i)MSE(ζ^i),CIi=ζ^i±1.96MSE^i

Table 2. Relative bias and coverage rate of nominal 95% confidence intervals when ρ=0.9 for different MSE estimators based on 1000 simulations and 100 bootstrap samples.
15 / 20

Estimating the leading term directly seems to improve the quality of CIs based on "Boot" when B = 100

Application to CEAP data

Data Description

Response

RUSLE2: sheet and rill erosion from cropland tons/yr

Auxilliary information

On a cropland grid at a spatial resolution of 56m

logR 💦: log-scale county-level Rainfall factor 👈 NRI

logK 🗻: log-scale erosion factor 👈 Soil Survey

logS 📐: log-scale slope gradient factor 👈 Soil Survey

crop_type 🌱: corn, soybean, sprwht or wtrwht 👈 CDL

16 / 20

Application to CEAP data

Data Description

Parameter Estimates

Based on the observed information matrix, 95% confidence interval for ρ is (0.67,0.84).

17 / 20

Application to CEAP data

Data Description

Parameter Estimates

EB Predictions

Figure 1. Cartogram of the EB predicted county means of cropland RUSLE2 in South Dakota. Smaller shrinkage indicates smaller coefficient of variance.

18 / 20

Eastern South Dakota: more cropland, more samples, more positive response Two counties have no sample, many counties have less than 5 samples, some county at most 30 samples. mean SE around 0.005

Conclusion

  • A frequentist approach has been proposed to fit zero-inflated lognormal model with correlated random effects in small area prediction.

  • When the true correlation deviates far from 0, the EB(0) predictor (Lyu 2018) has moderately larger MSE than the EB predictor (without model mis-specification).

  • The data analysis of the cropland CEAP RUSLE2 measurements collected in South Dakota shows the model assumptions are reasonable.

19 / 20
20 / 20

Appendix A: CEAP RUSLE2 Residual Analysis

Positive part fitted value: marginal 👉 xijβ^, conditional 👉 xijβ^+E^[ui|ysi]

  • marginal residual (top): (log(yij)xijβ^)/σ^u2+σ^e2
  • conditional residual (bottom): (log(yij)xijβ^E^[ui|ysi])/σ^e2
20 / 20

Appendix A: CEAP RUSLE2 Residual Analysis

Binary part: Hosmer-Lemeshow test with p^ij=E[pij(bi)|ysi]

20 / 20

Appendix B: Simulation results

Relative bias and coverage rate of nominal 95% confidence intervals
for the EB and the EB(0) predictor based on 1000 simulations.
20 / 20

Basic Setting

  • Predictions for small domains are our primary interest.

    • Standard survey estimators are often unreliable given small sample sizes. (Rao, Molina, 2015)

    • Use model to incorporate auxiliary information (known for the whole population).

2 / 20
Paused

Help

Keyboard shortcuts

, , Pg Up, k Go to previous slide
, , Pg Dn, Space, j Go to next slide
Home Go to first slide
End Go to last slide
Number + Return Go to specific slide
b / m / f Toggle blackout / mirrored / fullscreen mode
c Clone slideshow
p Toggle presenter mode
t Restart the presentation timer
?, h Toggle this help
Esc Back to slideshow