Estimates the Average Treatment effect on the Treated using paired
differences from a matched sample. Uses the explicit _matched
suffix to distinguish it from the IPW estimator
morie_estimate_att in causal.R.
Usage
morie_matching_att_matched(
data,
outcome,
treatment,
match_pairs,
weights = NULL,
alpha = 0.05
)Examples
# \donttest{
set.seed(1)
df <- data.frame(y = rnorm(200), d = rbinom(200, 1, 0.4),
x1 = rnorm(200), x2 = rnorm(200))
res <- morie_matching_nearest_neighbor(df, "d", c("x1", "x2"))
morie_matching_att_matched(df, "y", "d", res$match_pairs)
#> $estimand
#> [1] "ATT"
#>
#> $estimate
#> [1] -0.1000929
#>
#> $std_error
#> [1] 0.1316426
#>
#> $ci_lower
#> [1] -0.3581077
#>
#> $ci_upper
#> [1] 0.1579219
#>
#> $p_value
#> [1] 0.4470526
#>
#> $n_obs
#> [1] 87
#>
#> $details
#> list()
#>
#> attr(,"class")
#> [1] "morie_te_result" "list"
# }
