Mercurial > hg > ishara

diff general/numerical/pdev.m @ 21:8476b3d9d295

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Cleaning up and renaming things.
author samer
date Thu, 17 Jan 2013 14:21:24 +0000
parents e44f49929e56
children
line wrap: on
line diff
--- a/general/numerical/pdev.m	Thu Jan 17 13:33:36 2013 +0000
+++ b/general/numerical/pdev.m	Thu Jan 17 14:21:24 2013 +0000
@@ -12,11 +12,10 @@
 
 if nargin<2, D=1; end;
 
-% Should these be sum or mean?
 if p==2
 	N=sqrt(mean(abs(A).^2,D));
 else
-	N=mean(abs(A).^p,D).^(1/p);
+	N=real(mean(abs(A).^p,D).^(1/p));
 end