# HG changeset patch
# User Jaroslav Hajek <highegg@gmail.com>
# Date 1266409880 -3600
# Node ID e0767a0965f1bb550d7479ddf3dd30ab73880008
# Parent  83fa590b8a09d9318b3c649901e156717d9a6c2a
fix some stat functions with integers

diff --git a/scripts/ChangeLog b/scripts/ChangeLog
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,3 +1,7 @@
+2010-02-17  Jaroslav Hajek  <highegg@gmail.com>
+
+	* statistics/base/center.m: Convert integer inputs to doubles.
+
 2010-02-17  Jaroslav Hajek  <highegg@gmail.com>
 
 	* general/interp2: Slightly optimize linear interpolation.
diff --git a/scripts/statistics/base/center.m b/scripts/statistics/base/center.m
--- a/scripts/statistics/base/center.m
+++ b/scripts/statistics/base/center.m
@@ -41,6 +41,10 @@
   endif
   n = size (x, dim);
 
+  if (isinteger (x))
+    x = double (x);
+  endif
+
   if (n == 0)
     retval = x;
   else