Fixed name of standard error of statistic

diff --git a/src/regression.q b/src/regression.q
index a35786b4e35f1d1fa1a77320e09527046a075a42..2e54e46c31a70cdc99a751ee2b0e70f78ef843dc 100644 (file)
--- a/src/regression.q
+++ b/src/regression.q
@@ -99,12 +99,12 @@ reg_stats_r (pspp_linreg_cache * c)
   int n_cols = 5;
   double rsq;
   double adjrsq;
-  double stderr;
+  double std_error;
 
   assert (c != NULL);
   rsq = c->ssm / c->sst;
   adjrsq = 1.0 - (1.0 - rsq) * (c->n_obs - 1.0) / (c->n_obs - c->n_indeps);
-  stderr = sqrt ((c->n_indeps - 1.0) / (c->n_obs - 1.0));
+  std_error = sqrt ((c->n_indeps - 1.0) / (c->n_obs - 1.0));
   t = tab_create (n_cols, n_rows, 0);
   tab_dim (t, tab_natural_dimensions);
   tab_box (t, TAL_2, TAL_2, -1, TAL_1, 0, 0, n_cols - 1, n_rows - 1);
@@ -119,7 +119,7 @@ reg_stats_r (pspp_linreg_cache * c)
   tab_float (t, 1, 1, TAB_RIGHT, sqrt (rsq), 10, 2);
   tab_float (t, 2, 1, TAB_RIGHT, rsq, 10, 2);
   tab_float (t, 3, 1, TAB_RIGHT, adjrsq, 10, 2);
-  tab_float (t, 4, 1, TAB_RIGHT, stderr, 10, 2);
+  tab_float (t, 4, 1, TAB_RIGHT, std_error, 10, 2);
   tab_title (t, 0, _("Model Summary"));
   tab_submit (t);
 }