changeset 2764:4f9b59086fbf octave-forge

fix normalization
author schloegl
date Fri, 24 Nov 2006 11:55:54 +0000
parents dac5bde4a3ea
children d17da95fcf7a
files extra/NaN/inst/nanstd.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/extra/NaN/inst/nanstd.m	Wed Nov 22 13:07:51 2006 +0000
+++ b/extra/NaN/inst/nanstd.m	Fri Nov 24 11:55:54 2006 +0000
@@ -50,7 +50,7 @@
 [y,n] = sumskipnan(center(i,DIM).^2,DIM);
 
 if (FLAG~=1)
-        y = sqrt(y./(n.*max(n-1,0)));	% normalize with N-1
+        y = sqrt(y./max(n-1,0));	% normalize with N-1
 else
         y = sqrt(y)./n;	% normalize with N
 end;