ccfa (version 1.1.0)

lige: lige

Description

compute the local intergenerational elasticity

Usage

lige(cfaobj, h, se = T)

Arguments

cfaobj

a CFA object

h

a bandwidth

se

boolean whether or not to compute standard errors

Value

a CFASE object

Examples

# NOT RUN {
data(igm)
tvals <- seq(10,12,length.out=8)
yvals <- seq(quantile(igm$lcfincome, .05), quantile(igm$lcfincome, .95), length.out=50)
## obtain counterfactual results
out <- cfa2(lcfincome ~ lfincome, tvals, yvals, igm, method1="qr",
xformla2=~HEDUC, method2="qr", iters=10, tau1=seq(.05,.95,.05),
tau2=seq(.05,.95,.05))
lige(out$cfa1, h=0.5)
# }
# NOT RUN {
# }