X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Flinreg%2Flinreg.c;h=659d6ca48306440a22e5e99e8a355241ab1fd319;hb=0993546e3908becb569bbd979f09ab284cbbc09c;hp=0782c36fc3df82aae30d00c5f88fbd5f89aa3ad7;hpb=5b5f08a99c564c2f3e981ae0efe21ffc3c578ac4;p=pspp-builds.git

diff --git a/src/math/linreg/linreg.c b/src/math/linreg/linreg.c
index 0782c36f..659d6ca4 100644
--- a/src/math/linreg/linreg.c
+++ b/src/math/linreg/linreg.c
@@ -397,9 +397,9 @@ pspp_linreg (const gsl_vector * Y, const gsl_matrix * X,
       wk = gsl_multifit_linear_alloc (design->size1, design->size2);
       rc = gsl_multifit_linear (design, Y, param_estimates,
 				cache->cov, &(cache->sse), wk);
-      for (i = 1; i < cache->n_coeffs; i++)
+      for (i = 0; i < cache->n_coeffs; i++)
 	{
-	  cache->coeff[i]->estimate = gsl_vector_get (param_estimates, i);
+	  cache->coeff[i]->estimate = gsl_vector_get (param_estimates, i + 1);
 	}
       cache->intercept = gsl_vector_get (param_estimates, 0);
       if (rc == GSL_SUCCESS)