Fixed assignment of the intercept
authorJason Stover <jhs@math.gcsu.edu>
Fri, 16 Dec 2005 15:44:33 +0000 (15:44 +0000)
committerJason Stover <jhs@math.gcsu.edu>
Fri, 16 Dec 2005 15:44:33 +0000 (15:44 +0000)
lib/linreg/linreg.c

index fb6bbc45e1b298bb0e784035ab69a705208980e3..dc7f1d0172933a581b017a830a489890120ec5cf 100644 (file)
@@ -287,6 +287,7 @@ pspp_linreg (const gsl_vector * Y, const gsl_matrix * X,
          gsl_matrix_set (cache->cov, 0, 0, tmp);
 
          gsl_vector_set (cache->param_estimates, 0, m);
+         cache->coeff[0].estimate = m;
        }
       else
        {