From: Jason Stover <jhs@math.gcsu.edu>
Date: Fri, 16 Dec 2005 15:44:33 +0000 (+0000)
Subject: Fixed assignment of the intercept
X-Git-Tag: v0.6.0~1120
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b9799cdd10b30ea96d9178b7a0d48504d052228c;p=pspp-builds.git

Fixed assignment of the intercept
---

diff --git a/lib/linreg/linreg.c b/lib/linreg/linreg.c
index fb6bbc45..dc7f1d01 100644
--- a/lib/linreg/linreg.c
+++ b/lib/linreg/linreg.c
@@ -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
 	{