a perspective on mathematics, the pattern, and the abstract
Posts tagged: unknown parameters
![Mathematica code:
Manipulate[ Graphics[ Line[ Table[{-r^n*Sin[n*a], r^n*Cos[n/a]}, {n, 0, s}]], PlotRange -> 1.3],{r, .1, 1}, {a, .001, 4*Pi, .001}, {s, 1, 800, 1}]](http://25.media.tumblr.com/tumblr_ltrwrgQynd1qfjvexo1_500.gif)
Mathematica code:
Manipulate[
Graphics[
Line[
Table[{-r^n*Sin[n*a], r^n*Cos[n/a]}, {n, 0, s}]],
PlotRange -> 1.3],
{r, .1, 1}, {a, .001, 4*Pi, .001}, {s, 1, 800, 1}]
![Mathematica code:
Manipulate[ Graphics[ Line[ Table[{-r^n*Sin[n*a], r^n*Cos[n/a]}, {n, 0, s}]], PlotRange -> 1.3],{r, .1, 1}, {a, .001, 4*Pi, .001}, {s, 1, 800, 1}]](http://25.media.tumblr.com/tumblr_lwg0i7akaW1qfjvexo1_500.gif)
Mathematica code:
Manipulate[
Graphics[
Line[
Table[{-r^n*Sin[n*a], r^n*Cos[n/a]}, {n, 0, s}]],
PlotRange -> 1.3],
{r, .1, 1}, {a, .001, 4*Pi, .001}, {s, 1, 800, 1}]
