/*
  tconfint.sas
*/
options ls=80;
data myci;
  b1 = 0.12486;                   * slope estimate;
  SE = 0.01290;                   * Std. Error of b1;
*  Tcrit = quantile('T',.90,12); * Pr(T(12) < Tcrit) = 0.90;
  Tcrit = tinv(.95,12);
  ME = Tcrit*SE;
  LCL = b1 - ME;
  UCL = b1 + ME;

proc print;
  run;