## ---- warning=FALSE-----------------------------------------------------------
 ##load the package
 library(qte)

 ##load the data
 data(lalonde)

 ## Run the panel.qtet method on the experimental data with no covariates
 dd1 <- ddid2(re ~ treat, t=1978, tmin1=1975, tname="year",
  data=lalonde.psid.panel, idname="id", se=FALSE,
  probs=seq(0.05, 0.95, 0.05))
 summary(dd1)