X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fexamine.q;h=f3fec17b9047af5b0f16b08eee28ffede82ec2b7;hb=62120c1a218f5172d69357073297a1004ec9ee52;hp=c0facb0b84437774c51861a3f243a20d6b2386a3;hpb=ab249f50e9f994b9a92a74b148f596f47fee0de9;p=pspp

diff --git a/src/language/stats/examine.q b/src/language/stats/examine.q
index c0facb0b84..f3fec17b90 100644
--- a/src/language/stats/examine.q
+++ b/src/language/stats/examine.q
@@ -448,15 +448,18 @@ show_histogram (const struct variable **dependent_var,
 	  struct string str;
 	  const struct factor_result *result =
 	    ll_data (ll, struct factor_result, ll);
+          double mean, var, n;
 
 	  ds_init_empty (&str);
 	  ds_put_format (&str, "%s ", var_get_name (dependent_var[v]));
 
 	  factor_to_string (fctr, result, &str);
 
+          moments1_calculate ((struct moments1 *) result->metrics[v].moments,
+                              &n, &mean, &var, NULL,  NULL);
 	  histogram_plot ((struct histogram *) result->metrics[v].histogram,
 			  ds_cstr (&str),
-			  (struct moments1 *) result->metrics[v].moments);
+			  n, mean, sqrt (var), false);
 
 	  ds_destroy (&str);
 	}
@@ -606,7 +609,7 @@ show_boxplot_variables (const struct variable **dependent_var,
       var_append_value_name (fctr->indep_var[0], &result->value[0], &title);
 #endif
 
-      chart_write_title (ch, ds_cstr (&title));
+      chart_write_title (ch, "%s", ds_cstr (&title));
       ds_destroy (&title);
 
       for (v = 0; v < n_dep_var; ++v)