| |
|
Science Forum Index » Fractals Science Forum » Two new types of chaotic sequence...
Page 1 of 1
|
| Author |
Message |
| Roger Bagula... |
 Posted: Sun Jun 29, 2008 12:20 pm |
|
|
|
Guest
|
http://www.geocities.com/rlbagulatftn/chaotic_steptonoise.gif
Two new types of chaotic sequence plotted against each other.
Mathematica:
Clear[a, f, b, c, g]
(* fractal noise chaotic sequence*)
f[0] = 1; f[1] = 0; f[1] = 1;
f[n_] := f[n] = f[n - f[n - 1]] + f[Floor[2*n/3]]
(* Cantor like fractal stair step chaotic sequence*)
g[0] = 1; g[1] = 0; g[1] = 1;
g[n_] := g[n] = g[Floor[2*n/3]] + g[Floor[n/3]]
ListPlot[Table[{f[n], g[n]}, {n, 0, 200}], PlotJoined -> True] |
|
|
| Back to top |
|
| |
|
Page 1 of 1
All times are GMT - 5 Hours
The time now is Fri Dec 05, 2008 10:45 am
|
|
