options linesize=76;
options pagesize=53;
data dat5;
  infile 'dat5.dat';
  input F K;
title 'Guide 5 Example ';
proc reg;
 model K=F;
 output out=new1 p=predict r=resid;
proc rank normal=blom out=new2;
 var resid;
 ranks normscrs;
proc plot;
 plot resid*F='*' / vref=0;
 plot resid*normscrs='*';
 label resid='Residuals'
       normscrs='Normal Scores';
run;