mte {localIV} | R Documentation |
Fitting a Marginal Treatment Effects (MTE) Model.
Description
mte
fits a MTE model using either the semiparametric local instrumental
variables (local IV) method or the normal selection model (Heckman, Urzua, Vytlacil 2006).
The user supplies a formula for the treatment selection equation, a formula for the
outcome equations, and a data frame containing all variables. The function returns an
object of class mte
. Observations that contain NA (either in selection
or
in outcome
) are removed.
Usage
mte(
selection,
outcome,
data = NULL,
method = c("localIV", "normal"),
bw = NULL
)
mte_localIV(mf_s, mf_o, bw = NULL)
mte_normal(mf_s, mf_o)
Arguments
selection |
A formula representing the treatment selection equation. |
outcome |
A formula representing the outcome equations where the left hand side is the observed outcome and the right hand side includes predictors of both potential outcomes. |
data |
A data frame, list, or environment containing the variables in the model. |
method |
How to estimate the model: either " |
bw |
Bandwidth used for the local polynomial regression in the local IV approach. Default is 0.25. |
mf_s |
A model frame for the treatment selection equations returned by
|
mf_o |
A model frame for the outcome equations returned by
|
Details
mte_localIV
estimates \textup{MTE}(x, u)
using the semiparametric local IV method,
and mte_normal
estimates \textup{MTE}(x, u)
using the normal selection model.
Value
An object of class mte
.
coefs |
A list of coefficient estimates: |
ufun |
A function representing the unobserved component of |
ps |
Estimated propensity scores. |
ps_model |
The propensity score model, an object of class |
mf_s |
The model frame for the treatment selection equation. |
mf_o |
The model frame for the outcome equations. |
complete_row |
A logical vector indicating whether a row is complete (no missing variables) in the
original |
call |
The matched call. |
References
Heckman, James J., Sergio Urzua, and Edward Vytlacil. 2006. "Understanding Instrumental Variables in Models with Essential Heterogeneity." The Review of Economics and Statistics 88:389-432.
See Also
mte_at
for evaluating MTE at different values of the latent resistance u
;
mte_tilde_at
for evaluating MTE projected onto the propensity score;
ace
for estimating average causal effects from a fitted mte
object.
Examples
mod <- mte(selection = d ~ x + z, outcome = y ~ x, data = toydata, bw = 0.25)
summary(mod$ps_model)
hist(mod$ps)
mte_vals <- mte_at(u = seq(0.05, 0.95, 0.1), model = mod)
if(require("ggplot2")){
ggplot(mte_vals, aes(x = u, y = value)) +
geom_line(size = 1) +
xlab("Latent Resistance U") +
ylab("Estimates of MTE at Mean Values of X") +
theme_minimal(base_size = 14)
}