Data commit

Task/Polyspiral/Gnuplot/polyspiral-1.gnuplot

@@ -0,0 +1,15 @@
+## plotpoly.gp 1/10/17 aev
+## Plotting a polyspiral and writing to the png-file.
+## Note: assign variables: rng, d, clr, filename and ttl (before using load command).
+## Direction d (-1 clockwise / 1 counter-clockwise)
+reset
+set terminal png font arial 12 size 640,640
+ofn=filename.".png"
+set output ofn
+unset border; unset xtics; unset ytics; unset key;
+set title ttl font "Arial:Bold,12"
+set parametric
+c=rng*pi; set xrange[-c:c]; set yrange[-c:c];
+set dummy t
+plot [0:c] t*cos(d*t), t*sin(d*t) lt rgb @clr
+set output

Task/Polyspiral/Gnuplot/polyspiral-2.gnuplot

@@ -0,0 +1,102 @@
+## PSpirals.gp 1/10/17 aev
+## Plotting many polyspiral pictures.
+## Note: assign variables: rng, d, clr, filename and ttl (before using load command).
+## Direction d (-1 clockwise / 1 counter-clockwise)
+#cd 'C:\gnupData'
+
+##PS0 smooth spiral (not a polyspiral)
+reset
+set terminal png font arial 12 size 640,640
+set output "PS0gp.png"
+set title "Smooth spiral  #0 rng=10" font "Arial:Bold,12"
+set parametric
+c=10*pi; set trange [0:c]; set xrange[-c:c]; set yrange[-c:c];
+set samples 1000
+plot t*cos(t), t*sin(t) lt rgb "red"
+set output
+
+##PS1 A polyspiral (Same size as PS0).
+rng=10; d=1; clr = '"dark-green"';
+filename = "PS1gp"; ttl = "Polyspiral #1 rng=10";
+load "plotpoly.gp"
+
+##PS3 A polyspiral
+rng=20; d=-1; clr = '"red"';
+filename = "PS3gp"; ttl = "Polyspiral #3 rng=20";
+load "plotpoly.gp"
+
+##PS4 A polyspiral having 4 secondary spirals.
+rng=50; d=-1; clr = '"navy"';
+filename = "PS4gp"; ttl = "Polyspiral #4 rng=50";
+load "plotpoly.gp"
+
+##PS5 Not a polyspiral, but has 8 secondary spirals.
+rng=75; d=-1; clr = '"navy"';
+filename = "PS5gp"; ttl = "Polyspiral #5 rng=75";
+load "plotpoly.gp"
+
+##PS6 Not a polyspiral, just a nice figure (seen in zkl).
+rng=100; d=-1; clr = '"navy"';
+filename = "PS6gp"; ttl = "Polyspiral #6 rng=100";
+load "plotpoly.gp"
+
+##==============================
+#### NO PICTURES on RC starting from here, test it yourself
+
+##PS2 A polyspiral
+rng=20; d=1; clr = '"red"';
+filename = "PS2gp"; ttl = "Polyspiral #2 rng=20";
+load "plotpoly.gp"
+
+##PS7 Looks like PS5, but has 5 secondary spirals (not 8)
+rng=120; d=-1; clr = '"green"';
+filename = "PS7gp"; ttl = "Polyspiral #7 rng=120";
+load "plotpoly.gp"
+
+##PS8 Looks like PS4, but more distortion.
+rng=150; d=-1; clr = '"green"';
+filename = "PS8gp"; ttl = "Polyspiral #8 rng=150";
+load "plotpoly.gp"
+
+##PS9 Looks like PS2, but less loops..
+rng=175; d=-1; clr = '"green"';
+filename = "PS9gp"; ttl = "Polyspiral #9 rng=175";
+load "plotpoly.gp"
+
+##PS10 One loop of a spiral
+rng=200; d=-1; clr = '"green"';
+filename = "PS10gp"; ttl = "Polyspiral #10 rng=200";
+load "plotpoly.gp"
+
+##PS11 Polyspiral with line segments crossing other line segments.
+rng=30; d=-1; clr = '"navy"';
+filename = "PS11gp"; ttl = "Polyspiral #11 rng=30";
+load "plotpoly.gp"
+
+##PS12 Looks like PS4, but has 5 secondary spirals.
+rng=40; d=-1; clr = '"navy"';
+filename = "PS12gp"; ttl = "Polyspiral #12 rng=40";
+load "plotpoly.gp"
+
+##PS13 Looks like PS5, but has 8 secondary spirals.
+rng=60; d=-1; clr = '"navy"';
+filename = "PS13gp"; ttl = "Polyspiral #13 rng=60";
+load "plotpoly.gp"
+
+##PS14 Looks like PS4, but has 5 secondary spirals.
+rng=80; d=-1; clr = '"navy"'
+filename = "PS14gp"; ttl = "Polyspiral #14 rng=80";
+load "plotpoly.gp"
+
+##PS15 Not a polyspiral. Hmmm, just a star?
+rng=90; d=-1; clr = '"navy"';
+filename = "PS15gp"; ttl = "Polyspiral #15 rng=90";
+load "plotpoly.gp"
+
+##PS16 Not a polyspiral. Hmmm, just another star?
+rng=300; d=-1; clr = '"navy"';
+filename = "PS16gp"; ttl = "Polyspiral #16 rng=300";
+load "plotpoly.gp"
+
+## Continue plotting starting with a range rng=110 to 400+ step 10 to discover new figures.
+## END ##

Task/Polyspiral/Gnuplot/polyspiral-3.gnuplot

@@ -0,0 +1,14 @@
+## plotpolya.gp 1/19/17 aev
+## Plotting a polyspiral and writing to the png-file. Simple plot for animation.
+## Note: assign variables: rng, d, clr, filename (before using load command).
+## ====  NO ttl (title) in this version.
+reset
+set terminal png font arial 12 size 640,640
+ofn=filename.".png"
+set output ofn
+unset border; unset xtics; unset ytics; unset key;
+set parametric
+c=rng*pi; set xrange[-c:c]; set yrange[-c:c];
+set dummy t
+plot [0:c] t*cos(d*t), t*sin(d*t) lt rgb @clr
+set output

Task/Polyspiral/Gnuplot/polyspiral-4.gnuplot

@@ -0,0 +1,55 @@
+## PSpirals4a.gp 1/19/17 aev
+## Plotting many polyspiral and other pictures for animation
+## Notes: 1. Assign variables: rng, d, clr, filename(before using load command).
+## ====== 2. NO title in this version.
+##        3. Primarily range is changed.
+## Direction d (-1 clockwise / 1 counter-clockwise)
+#cd 'C:\gnupData'
+
+##====== for PolySpirsAnim.gif ==========================================
+##PS0 A polyspiral (direction: counter-clockwise).
+rng=10; d=1; clr = '"red"'; filename = "PS0"; load "plotpolya.gp";
+
+##PS1 A polyspiral (direction: clockwise).
+rng=20; d=-1; clr = '"red"'; filename = "PS1"; load "plotpolya.gp";
+
+##PS2 A polyspiral. Looks like PS1, but less loops..
+rng=175; d=-1; clr = '"red"'; filename = "PS2"; load "plotpolya.gp";
+
+##PS3 Polyspiral with line segments crossing other line segments.
+rng=30; d=-1; clr = '"red"'; filename = "PS3"; load "plotpolya.gp";
+
+##PS4 A polyspiral having 4 secondary spirals.
+rng=50; d=-1; clr = '"red"'; filename = "PS4"; load "plotpolya.gp";
+
+##PS5 A polyspiral. Looks like PS4, but has 5 secondary spirals.
+rng=40; d=-1; clr = '"red"'; filename = "PS5"; load "plotpolya.gp";
+
+##PS6 A polyspiral. Looks like PS4, but has more distortion.
+rng=150; d=-1; clr = '"red"'; filename = "PS6"; load "plotpolya.gp";
+
+##PS7 A polyspiral. Has 8 secondary spirals and even more distortion.
+rng=60; d=-1; clr = '"red"'; filename = "PS7"; load "plotpolya.gp";
+
+
+##====== for NiceFigsAnim.gif ==========================================
+##PS8 Not a polyspiral, but has 8 secondary spirals.
+rng=75; d=-1; clr = '"navy"'; filename = "PS8"; load "plotpolya.gp";
+
+##PS9 Looks like PS8, but has 5 secondary spirals.
+rng=80; d=-1; clr = '"navy"'; filename = "PS9"; load "plotpolya.gp";
+
+##PS10 Looks like PS8, but has 5 secondary spirals (not 8)
+rng=120; d=-1; clr = '"navy"'; filename = "PS10"; load "plotpolya.gp";
+
+##PS11 Not a polyspiral, just nice figure.
+rng=100; d=-1; clr = '"navy"'; filename = "PS11"; load "plotpolya.gp";
+
+##PS12 Not a polyspiral. Hmmm, just a star?
+rng=90; d=-1; clr = '"navy"'; filename = "PS12"; load "plotpolya.gp";
+
+##PS13 Not a polyspiral. Hmmm, just another star?
+rng=300; d=-1; clr = '"navy"'; filename = "PS13"; load "plotpolya.gp";
+
+##PS14 Not a polyspiral, but has many short secondary spirals.
+rng=700; d=-1; clr = '"navy"'; filename = "PS14"; load "plotpolya.gp";

Task/Polyspiral/Gnuplot/polyspiral-5.gnuplot

@@ -0,0 +1,21 @@
+## Animation for polyspirals PS0 - PS6
+reset
+set terminal gif animate delay 100 loop 2 size 640,640
+set output 'PolySpirsAnim.gif'
+unset border; unset xtics; unset ytics; unset key;
+unset autoscale
+set xrange[0:640]
+set yrange[0:640]
+do for [i=0:6]{plot 'PS'.i.'.png' binary filetype=png with rgbimage}
+set output
+
+## Animation for nice figures PS8 - PS14
+reset
+set terminal gif animate delay 100 loop 2 size 640,640
+set output 'NiceFigsAnim.gif'
+unset border; unset xtics; unset ytics; unset key;
+unset autoscale
+set xrange[0:640]
+set yrange[0:640]
+do for [i=8:14]{plot 'PS'.i.'.png' binary filetype=png with rgbimage}
+set output

Task/Polyspiral/Gnuplot/polyspiral-6.gnuplot

@@ -0,0 +1,6 @@
+<!-- PolySpirsAnim.html -->
+<html><body>
+  <h3>Gnuplot: Polyspirals animation  >>
+  <a href="NiceFigsAnim.html">Next: Nice figures animation</a></h3>
+  <img src="PolySpirsAnim.gif">
+</body></html>

Task/Polyspiral/Gnuplot/polyspiral-7.gnuplot

@@ -0,0 +1,6 @@
+<!-- NiceFigsAnim.html -->
+<html><body>
+  <h3>Gnuplot: Nice figures animation  >>
+  <a href="PolySpirsAnim.html">Next: Polyspirals animation</a></h3>
+  <img src="NiceFigsAnim.gif">
+</body></html>