Mercurial > octave-nkf

diff scripts/statistics/base/center.m @ 6024:500d884ae373

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-10-03 14:27:33 by jwe]
author jwe
date Tue, 03 Oct 2006 14:27:34 +0000
parents 2a16423e4aa0
children 34f96dd5441b
line wrap: on
line diff
--- a/scripts/statistics/base/center.m	Tue Oct 03 02:14:21 2006 +0000
+++ b/scripts/statistics/base/center.m	Tue Oct 03 14:27:34 2006 +0000
@@ -39,7 +39,7 @@
     retval = x - mean (x, varargin{:});
   elseif (ismatrix (x))
     if nargin < 2
-      dim = min (find (size (x) > 1));
+      dim = find (size (x) > 1, 1);
       if isempty (dim), 
 	dim=1; 
       endif;