Mercurial > hg > octave-nkf

comparison scripts/plot/multiplot.m @ 5252:3d9afb170a39

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-03-28 18:40:35 by jwe]
author jwe
date Mon, 28 Mar 2005 18:40:35 +0000
parents 32c569794216
children 4c8a2e4e0717
comparison
equal deleted inserted replaced
5251:454e3c98300d 5252:3d9afb170a39
71 71
72 if (xn < 1 || yn < 1) 72 if (xn < 1 || yn < 1)
73 error ("multiplot: xn and yn have to be positive integers"); 73 error ("multiplot: xn and yn have to be positive integers");
74 endif 74 endif
75 75
76 __gnuplot_set__ multiplot; 76 __gnuplot_raw__ ("set multiplot;\n");
77 77
78 xsize = 1.0 ./ xn; 78 xsize = 1.0 ./ xn;
79 ysize = 1.0 ./ yn; 79 ysize = 1.0 ./ yn;
80 80
81 eval (sprintf ("__gnuplot_set__ size %g, %g", xsize, ysize)); 81 __gnuplot_raw__ (sprintf ("set size %g, %g;\n", xsize, ysize));
82 82
83 xo = 0.0; 83 xo = 0.0;
84 yo = (yn - 1.0)*ysize; 84 yo = (yn - 1.0)*ysize;
85 85
86 eval (sprintf ("__gnuplot_set__ origin %g, %g", xo, yo)); 86 __gnuplot_raw__ (sprintf ("set origin %g, %g;\n", xo, yo));
87 87
88 __multiplot_mode__ = 1; 88 __multiplot_mode__ = 1;
89 __multiplot_xsize__ = xsize; 89 __multiplot_xsize__ = xsize;
90 __multiplot_ysize__ = ysize; 90 __multiplot_ysize__ = ysize;
91 __multiplot_xn__ = xn; 91 __multiplot_xn__ = xn;