Mercurial > octave-nkf
changeset 5243:28c69e8c0e85
[project @ 2005-03-24 06:36:02 by jwe]
| author | jwe |
|---|---|
| date | Thu, 24 Mar 2005 06:36:02 +0000 |
| parents | 937358a05a18 |
| children | a34c3c5c37cf |
| files | scripts/ChangeLog scripts/statistics/base/mean.m |
| diffstat | 2 files changed, 11 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog Thu Mar 24 06:23:10 2005 +0000 +++ b/scripts/ChangeLog Thu Mar 24 06:36:02 2005 +0000 @@ -1,3 +1,8 @@ +2005-03-24 Quentin Spencer <qspencer@ieee.org> + + * statistics/base/mean.m: Allow DIMS arg greater than the number + of dimensions of X. + 2005-03-23 John W. Eaton <jwe@octave.org> * general/tril.m, general/triu.m: Return value of same class as
--- a/scripts/statistics/base/mean.m Thu Mar 24 06:23:10 2005 +0000 +++ b/scripts/statistics/base/mean.m Thu Mar 24 06:36:02 2005 +0000 @@ -96,8 +96,12 @@ endif endif - sz = size (x); - n = sz (dim); + if (dim > ndims (x)) + n = 1; + else + sz = size (x); + n = sz (dim); + endif if (strcmp (opt, "a")) y = sum (x, dim) / n;