[Pspp-cvs] pspp/src/math/linreg linreg.c coefficient.c

[Jason H Stover]

CVSROOT:        /sources/pspp
Module name:    pspp
Branch:         
Changes by:     Jason H Stover <address@hidden> 06/04/09 19:47:50

Modified files:
        src/math/linreg: linreg.c coefficient.c 

Log message:
        updated residual function; fixed bug in coefficient.c

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pspp/pspp/src/math/linreg/linreg.c.diff?tr1=1.6&tr2=1.7&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/pspp/pspp/src/math/linreg/coefficient.c.diff?tr1=1.8&tr2=1.9&r1=text&r2=text

Patches:
Index: pspp/src/math/linreg/coefficient.c
diff -u pspp/src/math/linreg/coefficient.c:1.8 
pspp/src/math/linreg/coefficient.c:1.9
--- pspp/src/math/linreg/coefficient.c:1.8      Sun Apr  9 19:01:11 2006
+++ pspp/src/math/linreg/coefficient.c  Sun Apr  9 19:47:50 2006
@@ -201,6 +201,8 @@
       return NULL;
     }
 
+  result = c->coeff + i;
+  tmp = pspp_linreg_coeff_get_var (result, 0);
   while (tmp->index != v->index && i < c->n_coeffs)
     {
       result = c->coeff + i;
Index: pspp/src/math/linreg/linreg.c
diff -u pspp/src/math/linreg/linreg.c:1.6 pspp/src/math/linreg/linreg.c:1.7
--- pspp/src/math/linreg/linreg.c:1.6   Sun Apr  9 19:01:11 2006
+++ pspp/src/math/linreg/linreg.c       Sun Apr  9 19:47:50 2006
@@ -99,6 +99,7 @@
   pspp_linreg_cache *c;
 
   c = (pspp_linreg_cache *) malloc (sizeof (pspp_linreg_cache));
+  c->depvar = NULL;
   c->indep_means = gsl_vector_alloc (p);
   c->indep_std = gsl_vector_alloc (p);
   c->ssx = gsl_vector_alloc (p);       /* Sums of squares for the