fixed check for equality of explanatory and predictor variables

diff --git a/src/language/stats/ChangeLog b/src/language/stats/ChangeLog
index 92a01000496f5c00b1eda3ef6feafc7716876cbd..0b6d4e369f0f15a58c99b9d650239764db07d264 100644 (file)
--- a/src/language/stats/ChangeLog
+++ b/src/language/stats/ChangeLog
@@ -1,3 +1,8 @@
+2008-04-08  Jason Stover  <jhs@math.gcsu.edu>
+
+       * regression.q (identify_indep_vars): Don't panic unless
+       n_indep_vars is 0.
+
 2008-03-16  Ben Pfaff  <blp@gnu.org>
 
        Bug #22037.  Thanks to John Darrington for reporting this bug.

diff --git a/src/language/stats/regression.q b/src/language/stats/regression.q
index 86d102d7c7037166752a9570d2d547c09016180a..92afb378cea85c45d308d7a38845d2640cb80d68 100644 (file)
--- a/src/language/stats/regression.q
+++ b/src/language/stats/regression.q
@@ -797,7 +797,7 @@ identify_indep_vars (const struct variable **indep_vars,
   for (i = 0; i < n_variables; i++)
     if (!is_depvar (i, depvar))
       indep_vars[n_indep_vars++] = v_variables[i];
-  if ((n_indep_vars < 2) && is_depvar (0, depvar))
+  if ((n_indep_vars < 1) && is_depvar (0, depvar))
     {
       /*
        There is only one independent variable, and it is the same