Revert "added a description how to update linux distributions"

[pspp] / src / language / stats / runs.c

diff --git a/src/language/stats/runs.c b/src/language/stats/runs.c
index 788aae0d13f107d26f769a9068c646e17b27732f..cd963d32736f2630cc12663162aa9a9b9eba983c 100644 (file)
--- a/src/language/stats/runs.c
+++ b/src/language/stats/runs.c
@@ -100,7 +100,7 @@ runs_statistic (const struct run_state *rs)
 
 static void show_runs_result (const struct runs_test *, const struct run_state *, const struct dictionary *);
 
-void 
+void
 runs_execute (const struct dataset *ds,
              struct casereader *input,
              enum mv_class exclude,
@@ -132,7 +132,7 @@ runs_execute (const struct dataset *ds,
            const struct variable *var = otp->vars[v];
 
            reader = sort_execute_1var (reader, var);
-           
+
            grouper = casegrouper_create_vars (reader, &var, 1);
            last_cc = SYSMIS;
            while (casegrouper_get_next_group (grouper, &group))
@@ -206,7 +206,7 @@ runs_execute (const struct dataset *ds,
 
            median = percentile_create (0.5, cc);
            os = &median->parent;
-           
+
            order_stats_accumulate (&os, 1,
                                    reader,
                                    weight,
@@ -318,6 +318,7 @@ show_runs_result (const struct runs_test *rt, const struct run_state *rs, const
   const int column_headers = 1;
   struct tab_table *table =
     tab_create (row_headers + otp->n_vars, column_headers + 7);
+  tab_set_format (table, RC_WEIGHT, wfmt);
 
   tab_headers (table, row_headers, 0, column_headers, 0);
 
@@ -336,30 +337,30 @@ show_runs_result (const struct runs_test *rt, const struct run_state *rs, const
 
       double z = runs_statistic (run);
 
-      tab_text (table,  row_headers + i, 0, 
+      tab_text (table,  row_headers + i, 0,
                TAT_TITLE | TAB_CENTER ,
                var_to_string (otp->vars[i]));
 
       tab_double (table, row_headers +i, 1, 0,
-                 run->cutpoint, 0);
+                 run->cutpoint, NULL, RC_OTHER);
 
       tab_double (table, row_headers +i, 2, 0,
-                 run->nn, wfmt);
-                 
+                 run->nn, NULL, RC_WEIGHT);
+
       tab_double (table, row_headers +i, 3, 0,
-                 run->np, wfmt);
+                 run->np, NULL, RC_WEIGHT);
 
       tab_double (table, row_headers +i, 4, 0,
-                 run->n, wfmt);
+                 run->n, NULL, RC_WEIGHT);
 
       tab_double (table, row_headers +i, 5, 0,
-                 run->runs, &F_8_0);
+                 run->runs, NULL, RC_INTEGER);
 
       tab_double (table, row_headers +i, 6, 0,
-                 z, 0);
+                 z, NULL, RC_OTHER);
 
       tab_double (table, row_headers +i, 7, 0,
-                 2.0 * gsl_cdf_ugaussian_P (z), 0);
+                 2.0 * (1.0 - gsl_cdf_ugaussian_P (z)), NULL, RC_PVALUE);
     }
 
   switch  ( rt->cp_mode)