relar4.sas

SAS for Windows统计分析系统教程,里面有源码

data relar4;
  w1=1/(1/30+1/138+1/15+1/153);
  w2=1/(1/20+1/90+1/11+1/99);
  w=(w1*(log(2.217))**2+w2*(log(2))**2)-(w1*log(2.217)+w2*log(2))**2/(w1+w2);
  chis=probchi(w,1);
proc print;
run;