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

[Jason H Stover]

CVSROOT:        /sources/pspp
Module name:    pspp
Branch:         
Changes by:     Jason H Stover <address@hidden> 06/04/10 00:25:33

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

Log message:
        fixed prediction bug

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pspp/pspp/src/math/linreg/predict.c.diff?tr1=1.4&tr2=1.5&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/pspp/pspp/src/math/linreg/coefficient.c.diff?tr1=1.9&tr2=1.10&r1=text&r2=text

Patches:
Index: pspp/src/math/linreg/coefficient.c
diff -u pspp/src/math/linreg/coefficient.c:1.9 
pspp/src/math/linreg/coefficient.c:1.10
--- pspp/src/math/linreg/coefficient.c:1.9      Sun Apr  9 19:47:50 2006
+++ pspp/src/math/linreg/coefficient.c  Mon Apr 10 00:25:33 2006
@@ -209,7 +209,7 @@
       tmp = pspp_linreg_coeff_get_var (result, 0);
       i++;
     }
-  if (i == c->n_coeffs)
+  if (i > c->n_coeffs)
     {
       return NULL;
     }
Index: pspp/src/math/linreg/predict.c
diff -u pspp/src/math/linreg/predict.c:1.4 pspp/src/math/linreg/predict.c:1.5
--- pspp/src/math/linreg/predict.c:1.4  Sun Apr  9 19:01:11 2006
+++ pspp/src/math/linreg/predict.c      Mon Apr 10 00:25:33 2006
@@ -62,7 +62,7 @@
     {
       coe = pspp_linreg_get_coeff (c, predictors[j], vals[j]);
       i = 1;
-      while (found[i] != coe && i < c->n_coeffs)
+      while (found[i] == coe && i < c->n_coeffs)
        {
          i++;
        }