Annotation of OpenXM_contrib/gnuplot/demo/surface1.dem, Revision 1.1.1.3
1.1 maekawa 1: #
1.1.1.3 ! ohara 2: # $Id: surface1.dem,v 1.3.2.2 2001/12/04 14:12:53 lhecking Exp $
1.1 maekawa 3: #
4: set samples 21
5: set isosample 11
6: set xlabel "X axis" -3,-2
7: set ylabel "Y axis" 3,-2
8: set zlabel "Z axis" -5
9: set title "3D gnuplot demo"
10: set label 1 "This is the surface boundary" at -10,-5,150 center
11: set arrow 1 from -10,-5,120 to -10,0,0 nohead
12: set arrow 2 from -10,-5,120 to 10,0,0 nohead
13: set arrow 3 from -10,-5,120 to 0,10,0 nohead
14: set arrow 4 from -10,-5,120 to 0,-10,0 nohead
15: set xrange [-10:10]
16: set yrange [-10:10]
17: splot x*y
18: pause -1 "Hit return to continue (1)"
19: set noarrow
20: set nolabel
21: set grid
22: splot x**2+y**2, x**2-y**2
23: pause -1 "Hit return to continue (2)"
24: rep x*y
25: pause -1 "Hit return to continue (3)"
26: rep (x**3+y**3)/10
27: pause -1 "Hit return to continue (4)"
28: set ticslevel 0.0
29: set title "3D gnuplot demo ( ticslevel = 0.0 )"
30: rep
31: pause -1 "Hit return to continue (5)"
32: set ticslevel 2.0
33: set title "3D gnuplot demo ( ticslevel = 2.0 )"
34: rep
35: pause -1 "Hit return to continue (6)"
36: set ticslevel 0.5
37: set title "3D gnuplot demo ( ticslevel = 0.5 )"
38: rep
39: pause -1 "Hit return to continue (7)"
40: set title "3D gnuplot demo"
41: set nogrid
42: splot x*y with points
43: pause -1 "Hit return to continue (8)"
44: set noxtics
45: set noytics
46: set xrange [-1:1]
47: set yrange [-1:1]
48: set title "Surfaces with no grid or tics"
49: splot x*y with lines, x**2*y**3 with dots, x**3*y*2 with points
50: pause -1 "Hit return to continue (9)"
51: set xtics ("low" -3, "mid" 0, "high" 3)
52: set ytics -2,0.5,2
53: set xrange [-3:3]
54: set yrange [-3:3]
55: set log z
56: set title "Surfaces with z log scale"
57: splot x**2*y**2 + 2, x**2*y**4 + 2, x**4*y**2 + 2
58: pause -1 "Hit return to continue (10)"
59: set nolog z
60: set xtics autofreq
61: set ytics autofreq
62: set xrange [-1:1]
63: set yrange [-1:1]
64: set samples 51
65: set isosample 21
66: set dummy u,v
67: set title "3D gnuplot demo"
68: splot u*v / (u**2 + v**2 + 0.1)
69: pause -1 "Hit return to continue (11)"
70: splot [x=-3:3] [y=-3:3] sin(x) * cos(y)
71: pause -1 "Hit return to continue (12)"
1.1.1.3 ! ohara 72: set zrange [-1.0:1.0]
1.1 maekawa 73: replot
74: pause -1 "Hit return to continue (13)"
75: set title "Sinc function"
76: set zrange [-1:1]
1.1.1.3 ! ohara 77: set label 1 "This is equal to 1" at 0,3.2,1 left
! 78: set arrow 1 from 0,3,1 to 0,0,1
1.1 maekawa 79: sinc(u,v) = sin(sqrt(u**2+v**2)) / sqrt(u**2+v**2)
80: splot [-5:5.01] [-5:5.01] sinc(u,v)
81: pause -1 "Hit return to continue (14)"
82: set view 70,20,1
83: set zrange [-0.5:1.0]
84: set ztics -1,0.25,1
85: set label 1 "This is equal to 1" at -5,-2,1.5 centre
86: set arrow 1 from -5,-2.1,1.4 to 0,0,1
87: splot [-12:12.01] [-12:12.01] sinc(u,v)
88: pause -1 "Hit return to continue (15)"
89: set noarrow
90: set ztics autofreq
1.1.1.3 ! ohara 91: set noarrow
1.1 maekawa 92: set nolabel
93: set log
94: set auto
95: set title "This has logarithmic scale"
96: splot [x=1:15] [y=1:15] x**2+y**2
97: pause -1 "Hit return to continue (16)"
98: set nolog
99: set xrange [0:15]
100: set yrange [0:15]
101: set auto
102: #set zrange [-0.6:0.7]
103: set ticslevel 0
104: set data style lines
105: set title "Data grid plotting"
106: set parametric
107: splot "glass.dat"
108: pause -1 "Hit return to continue (17)"
109: splot "glass.dat" using 3:2:1
110: pause -1 "Hit return to continue (18)"
111: set zrange [-1.2:1.2]
112: set ticslevel 0.5
113: set noparametric
1.1.1.3 ! ohara 114: set xlabel "line index within group"
! 115: set ylabel "group index"
1.1 maekawa 116: splot "glass.dat" using 1, "glass.dat" using 2, "glass.dat" using 3
117: pause -1 "Hit return to continue (19)"
1.1.1.3 ! ohara 118: set parametric
1.1 maekawa 119: set title "Test of spherical transform"
1.1.1.3 ! ohara 120: set mapping spherical
1.1 maekawa 121: splot "glass.dat"
122: pause -1 "Hit return to continue (20)"
123:
124: # mandelbrot demo
1.1.1.3 ! ohara 125: set title "Mandelbrot function"
! 126: set noparametric
! 127: set mapping cartesian
1.1 maekawa 128: set view 60,30,1,1
129: set auto
130: set isosamples 60
131: set hidden3d
132: compl(a,b)=a*{1,0}+b*{0,1}
133: mand(z,a,n) = n<=0 || abs(z)>100 ? 1:mand(z*z+a,a,n-1)+1
134: splot [-2:1][-1.5:1.5] mand({0,0},compl(x,y),30)
135: pause -1 "Hit return to continue (21)"
1.1.1.2 maekawa 136: reset
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>