/* x3_7.sas */
/* Purpose:  */

title1 'Example 3.7.';

data a;
  input x y;
  x2=x*x;
  v=x2;
  if v=0 then v=1;
  w=1/v;
  cards;
 0 0.4
 1 0.3
 2 1.5
 3 1.3
 4 1.9
 5 4.2
 6 8.0
10  .
;

proc print data=a;
title2 'List of data. Note: observation 8 is only used when predicting.';

proc glm data=a;
  model y=x2 /noint solution xpx inverse p clm;
  weight w;
title2 '(Weighted) Analysis by GLM. Confidence limits for mean calculated.';

proc glm data=a;
  model y=x2 /noint p cli;
  weight w;
title2 '(Weighted) Analysis by GLM. Prediction limits for observation calculated.';

run;