Annotation of OpenXM_contrib/gnuplot/demo/polar.dem, Revision 1.1.1.2
1.1 maekawa 1: #
1.1.1.2 ! maekawa 2: # $Id: polar.dem,v 1.1.1.1.2.1 1999/10/11 13:24:50 lhecking Exp $
1.1 maekawa 3: #
4: # Show some of the new polar capabilities.
5: #
6: set noborder
7: set clip
8: set polar
9: set xtics axis nomirror
10: set ytics axis nomirror
11: set samples 160
12: set zeroaxis
13: set trange [0:2*pi]
14: set title "Three circles (with aspect ratio distortion)"
15: plot .5,1,1.5
16: pause -1 "Hit return to continue"
17: set title ""
1.1.1.2 ! maekawa 18: set key box
1.1 maekawa 19:
20: plot cos(2*t)
21: pause -1 "Hit return to continue"
22:
23: plot 2*sqrt(cos(t)),-2*sqrt(cos(t))
24: pause -1 "Hit return to continue"
25:
26: plot sin(4*t),cos(4*t)
27: set offset 0,0,0,0
28: pause -1 "Hit return to continue"
29:
30: set xrange [-5:5]
31: set yrange [-5:5]
32: plot t/cos(3*t)
33: pause -1 "Hit return to continue"
34: set autoscale
35:
36: plot 1-sin(t)
37: pause -1 "Hit return to continue"
38:
39: set trange [0:12*pi]
40: plot 2*t
41: pause -1 "Hit return to continue"
42:
43: butterfly(x)=exp(cos(x))-2*cos(4*x)+sin(x/12)**5
44: set samples 800
45: pause 0 "This is a big one (many samples), be patient..."
46: set title "Butterfly"
47: set nokey
48: plot butterfly(t)
49: pause -1 "Hit return to continue"
50:
51: # undo what we've done above
52: reset
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>