Dropped weight argument. Corrected update of entries of the covariance matrix

[pspp-builds.git] / src / language / stats / glm.q

diff --git a/src/language/stats/glm.q b/src/language/stats/glm.q
index ca18e842e7716b5048fca86b60f86cdc6087c529..c015afa7ec5784ab5a46c8006b560ce28040f750 100644 (file)
--- a/src/language/stats/glm.q
+++ b/src/language/stats/glm.q
@@ -334,7 +334,7 @@ run_glm (struct casereader *input,
                  const struct variable *w = all_vars[j];
                  const union value *val_w = case_data (&c, w);
                  covariance_pass_two (X, *mom[i]->mean, *mom[j]->mean,
-                                      (double) 1 / n_data, (double) n_data,
+                                      (double) n_data,
                                       v, w, val_v, val_w);
                }
            }