|
SigmaPlot Graph Animation
Click thumbnail to download animation
|
O-Matrix Commands
|
|
|
# Create animated XY sine + cosine wave
L = 2 # cycles to plot
M = 2 # cycles to display at once
N = 30 # points per cycle
P = 3 # points to shift between plots
for i = 1 to L begin
for j = 1 to N / P begin
shift = P * (j - 1) * 2 * pi / (N - 1)
x = (seq(M * N) - 1) * 2 * pi / (N - 1)
y = sin(x + shift)
z = cos(x + shift)
if( i == 1 and j == 1 ) then begin
splot(x, [y, z])
end else begin
spput([x, y, z])
end
imgFile = ["spimg",ntoa(i*100+j),".jpg"]
spexport([cwd,"\"], imgFile, "JPG")
end
end
|
|
|
# Create 2-D surface animation
mlmode sombrero.m # Matlab function to calculate surface
ix = 1.
N = 16
for i = 1 to N begin
z = sombrero(ix);
if( i == 1 ) then begin
ssurface(z,false)
spzscale( -0.5, 0.8 )
end else begin
spput(z)
end
if( i <= N/2 ) then ix = ix - .05
else ix = ix + .05
imgFile = ["s",ntoa(i+10),".jpg"]
print "Creating image file: ", imgFile
spexport([cwd,"\"], imgFile, "JPG")
|
|
|
# Create 2-D FFT contour animation
include example\demo\fft2dx.oms
stepSize = (max(G)-mins(G))/20
for i = 1 to 20 begin
G = G - stepSize
if( i == 1 ) then begin
scontour(G)
spzscale(-.165, .191)
end else begin
spput(G)
end
imgFile = ["c",ntoa(i+10),".jpg"]
spexport([cwd,"\"], imgFile, "JPG")
end
|
|
|
|
|
|
|
|
|
|
|
