Skip to contents

Performs a weighted bootstrap procedure for the output of telescope_match.

Usage

boots_tm(obj, boots = 1000, ci_alpha = 0.05)

Arguments

obj

A tmatch object, computed by telescope_match.

boots

The number of bootstrap replicates. Defaults to 1000.

ci_alpha

alpha value for the bootstrapped confidence intervals. Corresponds to a 100 * (1-alpha) confidence interval.

Value

An data.frame with columns `ci_low` and `ci_high` which contain the bootstrapped confidence intervals for the estimated ACDEs in obj$tau.

Examples

# \donttest{
data(jobcorps)

## Split male/female
jobcorps_female <- subset(jobcorps, female == 1)

## Telescope matching formula - First stage (X and Z)
tm_form <- exhealth30 ~  schobef + trainyrbef + jobeverbef  |
treat | emplq4 + emplq4full | work2year2q


### Estimate ACDE for women holding employment at 0
tm_out <-  telescope_match(
  tm_form,
  data = jobcorps_female,
  L = 3,
  boot = FALSE,
  verbose = TRUE
)
#> Beginning matching...
#> Matching work2year2q...
#> Matching treat...
#> Beginning bias correction...

out.boots <- boots_tm(tm_out)

out.boots
#>         ci_low    ci_high
#> 1 -0.206300499 0.01136792
#> 2 -0.009830319 0.07452051
# }