Mercurial > hg > octave-nkf

diff scripts/plot/mesh.m @ 6158:57aeb18f161d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-11-13 23:52:35 by jwe]
author jwe
date Mon, 13 Nov 2006 23:52:35 +0000
parents a46f14cdbecd
children 2de853a110df
line wrap: on
line diff
--- a/scripts/plot/mesh.m
+++ b/scripts/plot/mesh.m
@@ -42,8 +42,8 @@
   elseif (nargin == 3)
     if (isvector (x) && isvector (y) && ismatrix (z))
       if (rows (z) == length (y) && columns (z) == length (x))
-        x = repmat(x(:)', length (y), 1);
-        y = repmat(y(:), 1, length (x));
+        x = repmat(x(:)', rows (z), 1);
+        y = repmat(y(:), 1, columns (z));
       else
         msg = "mesh: rows (z) must be the same as length (y) and";
         msg = sprintf ("%s\ncolumns (z) must be the same as length (x)", msg);