[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Pspp-cvs] pspp/src/math/linreg linreg.c
From: |
Jason H Stover |
Subject: |
[Pspp-cvs] pspp/src/math/linreg linreg.c |
Date: |
Sun, 06 Apr 2008 22:03:02 +0000 |
CVSROOT: /sources/pspp
Module name: pspp
Changes by: Jason H Stover <jstover> 08/04/06 22:03:02
Modified files:
src/math/linreg: linreg.c
Log message:
oops
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pspp/src/math/linreg/linreg.c?cvsroot=pspp&r1=1.29&r2=1.30
Patches:
Index: linreg.c
===================================================================
RCS file: /sources/pspp/pspp/src/math/linreg/linreg.c,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -b -r1.29 -r1.30
--- linreg.c 6 Apr 2008 21:59:13 -0000 1.29
+++ linreg.c 6 Apr 2008 22:03:01 -0000 1.30
@@ -397,9 +397,9 @@
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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Pspp-cvs] pspp/src/math/linreg linreg.c,
Jason H Stover <=