data one;
  input flight thrower $ plane $ distance;
  cards;
   1    Oscar       Dart        432
   2    Weihong    Floater        0
   3    Michael     Flyer       432
   4    Jennifer   Floater      152
   5    In-Koo      Dart        395
   6    Rachel      Dart        219
   7    Jason       Dart        319
   8    Zhonglian   Flyer       219
   9    Faneng      Flyer        76
   10   Len         Flyer       239
   11   Stacy       Dart        128
   12   Keri       Floater      162
   14   Dongyan     Dart        110
   15   Sang-Ho     Flyer       217
   16   Jean       Floater      168
   17   Xin        Floater      252
   18   Matt        Flyer       177
   19   Alex        Dart        201
   20   Liying      Dart        224
   21   Embere      Flyer       318
   22   Ying       Floater       90
   23   Jeff       Floater      122
   24   Marianela   Dart        254
   25   Pete        Flyer       277
   26   Bryce      Floater      156
   27   Donggill   Floater      209
   28   Rocio       Flyer       292
   29   Penny      Floater      291
   30   Ryan        Flyer       283
   31   Cari        Flyer       188
   32   Carrie      Dart        268
   33   Yanling     Dart        308
   34   Zhiping     Flyer       334
   36   Julie       Dart        293
   37   Lisa       Floater      194
   38   Janet       Flyer       155
   39   Nick       Floater      151
   40   Kathryn     Dart        176
;

proc sort data=one out=one;
  by plane;
run;

proc print;
run;

proc means mean std n;
  var distance;
  class plane;
run;

proc glm;
  class plane;
  model distance=plane;
  output out=two residual=ehat predicted=yhat;
run;

proc univariate plot data=two;
  var ehat;
run;

proc plot data=two;
  plot ehat*yhat;
run;