Mercurial > forge

changeset 9956:c570726d5254 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
control-devel: touch up fft method (2)
author paramaniac
date Wed, 04 Apr 2012 09:09:45 +0000
parents 8b57648139ab
children fbacee957ac6
files extra/control-devel/inst/@iddata/fft.m
diffstat 1 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/extra/control-devel/inst/@iddata/fft.m	Wed Apr 04 08:45:53 2012 +0000
+++ b/extra/control-devel/inst/@iddata/fft.m	Wed Apr 04 09:09:45 2012 +0000
@@ -47,8 +47,11 @@
 %  dat.y = cellfun (@fft, dat.y, "uniformoutput", false);
 %  dat.u = cellfun (@fft, dat.u, "uniformoutput", false);
 
-  dat.y = cellfun (@(y, n) fft (y, n) / sqrt (n), dat.y, n, "uniformoutput", false);
-  dat.u = cellfun (@(u, n) fft (u, n) / sqrt (n), dat.u, n, "uniformoutput", false);
+%  dat.y = cellfun (@(y, n) fft (y, n) / sqrt (n), dat.y, n, "uniformoutput", false);
+%  dat.u = cellfun (@(u, n) fft (u, n) / sqrt (n), dat.u, n, "uniformoutput", false);
+
+  dat.y = cellfun (@(y, n) fft (y, n)(1:fix(n/2)+1, :) / sqrt (n), dat.y, n, "uniformoutput", false);
+  dat.u = cellfun (@(u, n) fft (u, n)(1:fix(n/2)+1, :) / sqrt (n), dat.u, n, "uniformoutput", false);
   
   dat.timedomain = false;