localIV (version 0.2.0)

mprte: Estimation of Marginal Policy Relevant Treatment Effects (MPRTE)

Description

mprte is a function that estimates a class of marginal policy relevant treatment effects (MPRTE) considered in Zhou and Xie (2019). The user needs to specify a policy as a scalar function of the propensity score.

Usage

mprte(object, policy)

Arguments

object

An object of class mte returned by mte.

policy

A univariate scalar function that measures the intensity of policy intervention across individuals with different levels of the propensity score.

Value

Estimate of MPRTE.

References

Zhou, Xiang and Yu Xie. 2019. "Marginal Treatment Effects from A Propensity Score Perspective." Journal of Political Economy.

Examples

# NOT RUN {
mte_fit <- mte(selection = d ~ x + z, outcome = y ~ x,
  method = "localIV", data = toydata)

mprte1 <- mprte(mte_fit, policy = function(p) 1)
mprte2 <- mprte(mte_fit, policy = function(p) p)
mprte3 <- mprte(mte_fit, policy = function(p) I(p<0.2))
c(mprte1, mprte2, mprte3)

# }