Mercurial > hg > octave-nkf

diff scripts/plot/isosurface.m @ 10842:830e03dd844e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
isosurface.m: swap rows and columns of matrix in call to meshgrid
author Martin Helm <martin@mhelm.de>
date Sun, 01 Aug 2010 11:30:34 -0400
parents 95c3e38098bf
children a4f482e66b65
line wrap: on
line diff
--- a/scripts/plot/isosurface.m
+++ b/scripts/plot/isosurface.m
@@ -132,7 +132,7 @@
     endif
   else
     val = varargin{1};
-    [n1, n2, n3] = size (val);
+    [n2, n1, n3] = size (val);
     [x, y, z] = meshgrid (1:n1, 1:n2, 1:n3);
     iso = varargin{2};
     if (nargin >= 3 && ismatrix (varargin{3}))
@@ -214,4 +214,4 @@
 %! clf
 %! [x,y,z] = meshgrid(-2:0.5:2, -2:0.5:2, -2:0.5:2);
 %! v = x.^2 + y.^2 + z.^2;
-%! isosurface (x, y, z, v, 1) 
\ No newline at end of file
+%! isosurface (x, y, z, v, 1)