Mercurial > octave-nkf

changeset 11087:f42f6fc27cc0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
periodogram.m: fix parse errors
author John W. Eaton <jwe@octave.org>
date Thu, 07 Oct 2010 17:48:18 -0400
parents af03ff97df7b
children 3071d909ebab
files scripts/ChangeLog scripts/signal/periodogram.m
diffstat 2 files changed, 7 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Thu Oct 07 17:47:07 2010 -0400
+++ b/scripts/ChangeLog	Thu Oct 07 17:48:18 2010 -0400
@@ -1,3 +1,7 @@
+2010-10-07  John W. Eaton  <jwe@octave.org>
+
+	* signal/periodogram.m: Fix parse errors.
+
 2010-10-07  John W. Eaton  <jwe@octave.org>
 
 	* time/datevec.m: Use endfunction to mark end of primary
--- a/scripts/signal/periodogram.m	Thu Oct 07 17:47:07 2010 -0400
+++ b/scripts/signal/periodogram.m	Thu Oct 07 17:48:18 2010 -0400
@@ -136,7 +136,7 @@
     Pxx = 0;
     rr = rem (length (x), nfft);
     if (rr)
-      x = [x(:);zeros (nfft-rr, 1)];
+      x = [x(:); (zeros (nfft-rr, 1))];
     end
     x = sum (reshape (x, nfft, []), 2);
   endif
@@ -162,9 +162,9 @@
 
   if (nargout != 1)
     if (range == 1)
-      f = (0:nfft/2)"/nfft;
+      f = (0:nfft/2)'/nfft;
     elseif (range == 2)
-      f = (0:nfft-1)"/nfft;
+      f = (0:nfft-1)'/nfft;
     endif
     if (nargin<4)
       f *= 2*pi; # generate w=2*pi*f