# NOT RUN {
fm <- as.formula(treat ~ qtr_pmt + yr_pmt + age + is_male + is_white +
is_disabled + is_esrd + months_dual + chron_num+lq_ed+
yr_ed2 + lq_ip + yr_ip2)
vars <- all.vars(formula); treat <- vars[1]
tm <- "quarter"; id <- "indiv_id"
# }
# NOT RUN {
# }
Run the code above in your browser using DataCamp Workspace