Added examples directory
This commit is contained in:
parent
df01ee01db
commit
622ef39837
19
examples/hidden2.1.jl
Normal file
19
examples/hidden2.1.jl
Normal file
@ -0,0 +1,19 @@
|
||||
# Original example:
|
||||
# http://gnuplot.sourceforge.net/demo/hidden2.html
|
||||
|
||||
using Gnuplot
|
||||
|
||||
x = LinRange(-10, 10, 25)
|
||||
y = LinRange(-10, 10, 25)
|
||||
|
||||
@gsp "set xyplane at 0"
|
||||
@gsp :- "unset key"
|
||||
@gsp :- "set palette rgbformulae 31,-11,32"
|
||||
@gsp :- "set style fill solid 0.5"
|
||||
@gsp :- "set cbrange [-1:1]"
|
||||
@gsp :- title="Mixing pm3d surfaces with hidden-line plots"
|
||||
@gsp :- "set hidden3d front"
|
||||
|
||||
f = [sin(-sqrt((x+5)^2+(y-7)^2)*0.5) for x in x, y in y]
|
||||
z = [x*x-y*y for x in x, y in y]
|
||||
@gsp :- x y f "w pm3d" x y z "w l lc rgb 'black'"
|
||||
41
examples/hidden2.3.jl
Normal file
41
examples/hidden2.3.jl
Normal file
@ -0,0 +1,41 @@
|
||||
# Original example:
|
||||
# http://gnuplot.sourceforge.net/demo/hidden2.html
|
||||
|
||||
using Gnuplot
|
||||
|
||||
@gsp "set multiplot title 'Interlocking Tori'"
|
||||
U = LinRange(-pi, pi, 100); # 50
|
||||
V = LinRange(-pi, pi, 20);
|
||||
|
||||
@gsp :- "unset key" :-
|
||||
@gsp :- "unset xtics" :-
|
||||
@gsp :- "unset ytics" :-
|
||||
@gsp :- "unset ztics" :-
|
||||
@gsp :- "set border 0" :-
|
||||
@gsp :- "set view 60, 30, 1.5, 0.9" :-
|
||||
@gsp :- "unset colorbox" :-
|
||||
@gsp :- "set colorbox vertical user origin 0.9, 0.15 size 0.02, 0.50" :-
|
||||
@gsp :- "set format cb '%.1f'" :-
|
||||
|
||||
for loop in 1:2
|
||||
if loop == 1
|
||||
@gsp :- 1 title="PM3D surface\\nno depth sorting" :-
|
||||
@gsp :- "set origin -0.02,0.0" :-
|
||||
@gsp :- "set size 0.55, 0.9" :-
|
||||
@gsp :- "set pm3d scansforward" :- # scansbackward
|
||||
else
|
||||
@gsp :- 2 title="PM3D surface\\ndepth sorting" :-
|
||||
@gsp :- "set origin 0.40,0.0" :-
|
||||
@gsp :- "set size 0.55, 0.9" :-
|
||||
@gsp :- "set pm3d depthorder" :-
|
||||
end
|
||||
x = [cos(u) + .5 * cos(u) * cos(v) for u in U, v in V]; x = reshape(x, :)
|
||||
y = [sin(u) + .5 * sin(u) * cos(v) for u in U, v in V]; y = reshape(y, :)
|
||||
z = [.5 * sin(v) for u in U, v in V]; # Note: this must be a 2D array
|
||||
@gsp :- x y z "w pm3d"
|
||||
|
||||
x = [1 + cos(u) + .5 * cos(u) * cos(v) for u in U, v in V]; x = reshape(x, :)
|
||||
y = [.5 * sin(v) for u in U, v in V]; y = reshape(y, :)
|
||||
z = [sin(u) + .5 * sin(u) * cos(v) for u in U, v in V]; # Note: this must be a 2D array
|
||||
@gsp :- x y z "w pm3d"
|
||||
end
|
||||
Loading…
x
Reference in New Issue
Block a user