Homework 4-A St 708


  Work problem 4.3 page 150    */

   proc iml; reset spaces=6;
    XPXI = {1.7995972  -0.0685472  -.2531648,
            -0.0685472 0.0100774  -0.0010661,
            -0.2531648 -0.0010661  0.0570789};
    B_hat = { 51.5697, 1.49744, 6.7233};
    SSE = 27.5808;
   XPX = inv(XPXI);
 print XPX XPXI B_HAT SSE;


/*