*NKNW100a.sas;
libname xxx 'C:\Ageorge\Purdue\Stat512\Fall00\Programs';
options nocenter;
/*
Data xxx.a100a; 
   do x=1 to 100; 
      y=100*x+30+10*x*normal(0);
      output;
   end;
run;
*/
proc reg data=xxx.a100a;
   model y=x;
   output out=a2 r=resid;
run;
symbol1 v=circle i=sm60;
proc gplot data=a2;
   plot y*x/frame;
proc gplot data=a2;
   plot resid*x/frame vref=0;
run;