get_alpha_bounds: Calculate sharp bounds for a0 and a1
In fditraglia/binivdoctr:

Description Usage Arguments Value Examples

Calculate sharp bounds for a0 and a1

1	get_alpha_bounds(obs)

obs

List of observables calculated by getObs.

Vector with two elements: the first is the upper bound for a0 and the second is the upper bound for a1. (The lower bounds for each are both zero.)

afghanControls <- c("headchild", "age",  "yrsvill",  "farsi",  "tajik",
                   "farmers",  "agehead",  "educhead",  "nhh",  "land",
                   "sheep", "distschool", "chagcharan")
afghanY <- "testscore"
afghanT <- "enrolled"
afghanZ <- "buildschool"
afghanObs <- getObs(afghanY, afghanT, afghanZ, afghanControls, afghan)
get_alpha_bounds(afghanObs)