Mercurial > octave-nkf

comparison scripts/signal/freqz_plot.m @ 5215:32c569794216

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-03-16 18:54:42 by jwe]
author jwe
date Wed, 16 Mar 2005 18:54:52 +0000
parents 2b4e706ff011
children 4c8a2e4e0717
comparison
equal deleted inserted replaced
5214:eecc24b92d97 5215:32c569794216
43 43
44 replot_state = automatic_replot; 44 replot_state = automatic_replot;
45 automatic_replot = 0; 45 automatic_replot = 0;
46 46
47 subplot (311); 47 subplot (311);
48 gset lmargin 10; 48 __gnuplot_set__ lmargin 10;
49 axis ("labely"); 49 axis ("labely");
50 xlabel (""); 50 xlabel ("");
51 grid ("on"); 51 grid ("on");
52 axis ([ w(1), w(n), maxmag-3, maxmag ]); 52 axis ([ w(1), w(n), maxmag-3, maxmag ]);
53 plot (w, mag, ";Pass band (dB);"); 53 plot (w, mag, ";Pass band (dB);");
54 54
55 subplot (312); 55 subplot (312);
56 axis ("labely"); 56 axis ("labely");
57 title (""); 57 title ("");
58 xlabel (""); 58 xlabel ("");
59 gset tmargin 0; 59 __gnuplot_set__ tmargin 0;
60 grid ("on"); 60 grid ("on");
61 if (maxmag - min (mag) > 100) 61 if (maxmag - min (mag) > 100)
62 axis ([ w(1), w(n), maxmag-100, maxmag ]); 62 axis ([ w(1), w(n), maxmag-100, maxmag ]);
63 else 63 else
64 axis ("autoy"); 64 axis ("autoy");
82 ## mess up the graph, however if we don't do it here then the user 82 ## mess up the graph, however if we don't do it here then the user
83 ## will have to do it themselves. 83 ## will have to do it themselves.
84 84
85 grid ("off"); 85 grid ("off");
86 axis ("auto", "label"); 86 axis ("auto", "label");
87 gset lmargin; 87 __gnuplot_set__ lmargin;
88 gset tmargin; 88 __gnuplot_set__ tmargin;
89 oneplot (); 89 oneplot ();
90 90
91 automatic_replot = replot_state; 91 automatic_replot = replot_state;
92 92
93 end_unwind_protect 93 end_unwind_protect