Mercurial > hg > octave-nkf
diff scripts/general/num2str.m @ 7208:a730e47fda4d
[project @ 2007-11-28 02:32:41 by jwe]
author | jwe |
---|---|
date | Wed, 28 Nov 2007 02:32:42 +0000 |
parents | a1dbe9d80eee |
children | 83a8781b529d |
line wrap: on
line diff
--- a/scripts/general/num2str.m +++ b/scripts/general/num2str.m @@ -82,10 +82,10 @@ perm(2:2:2*nc) = perm(2:2:2*nc) + nc; idx = cell (); for i = 1:nd - idx {i} = 1:sz(i); + idx{i} = 1:sz(i); endfor idx{2} = perm; - x = horzcat (real(x), imag(x)); + x = horzcat (real (x), imag (x)); x = x(idx{:}); fmt = strcat (deblank (repmat (fmt, 1, nc)), "\n");