Skip to contents

Placebo cutoff falsification test

Usage

morie_rdd_placebo_cutoff(
  data,
  outcome,
  running,
  true_cutoff,
  placebo_cutoffs,
  bandwidth = NULL,
  p = 1,
  kernel = "triangular",
  alpha = 0.05
)

Arguments

data

A data.frame holding the outcome, running variable, treatment, and any covariates referenced by name.

outcome

Character; column name of the response variable in data.

running

Character; column name of the running (forcing) variable in data.

true_cutoff

Numeric; the actual policy cutoff (placebo robustness re-runs the analysis at placebo_cutoffs).

placebo_cutoffs

Numeric vector of false cutoffs to test.

bandwidth

Numeric; the local-polynomial bandwidth on each side of the cutoff. NULL invokes the data-driven CCT selector.

p

Integer; local-polynomial order (default 1 for local- linear). 2 picks up quadratic curvature for bias correction.

kernel

One of "triangular" (default), "epanechnikov", "uniform", or "gaussian".

alpha

Significance level (default 0.05).

Value

A logical scalar.

Examples

set.seed(1)
x <- runif(600, -1, 1)
y <- 0.3 * x + 1.0 * (x >= 0) + rnorm(600, sd = 0.3)
d <- data.frame(x, y)
out <- morie_rdd_placebo_cutoff(d, "y", "x", true_cutoff = 0,
                                placebo_cutoffs = c(-0.5, 0, 0.5))
out
#>   placebo_cutoff   estimate  std_error   p_value significant
#> 1           -0.5 0.06414657 0.08755858 0.4637944       FALSE
#> 2            0.5 0.09800480 0.09172129 0.2852921       FALSE