Mercurial > forge

changeset 1067:76e1a6f67810 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
bug fix for complex data
author schloegl
date Thu, 09 Oct 2003 08:27:03 +0000
parents 5cc3540f386c
children a9c30f62cb2e
files extra/NaN/zscore.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/extra/NaN/zscore.m	Mon Oct 06 12:14:24 2003 +0000
+++ b/extra/NaN/zscore.m	Thu Oct 09 08:27:03 2003 +0000
@@ -51,5 +51,5 @@
 [S,N,SSQ] = sumskipnan(i,DIM);		% sum
 M = S./N;
 i = i - repmat(M,size(i)./size(S));		% remove mean
-i = i./repmat(sqrt((SSQ-real(S).*real(M)-imag(S).*imag(S))./max(N-1,0)),size(i)./size(S));	 % normalize by STD
+i = i./repmat(sqrt((SSQ-real(S).*real(M)-imag(S).*imag(M))./max(N-1,0)),size(i)./size(S));	 % normalize by STD