|
Search: id:A118604
|
|
|
| A118604 |
|
A chaotic dual modulo recursive sequence made so that 13/8 =1.625 is near Phi the golden mean ratio. |
|
+0
1
|
|
| 0, 1, 1, 2, 3, 5, 8, 13, 0, 5, 5, 10, 15, 4, 11, 15, 5, 12, 17, 8, 9, 9, 10, 11, 13, 3, 8, 11, 11, 14, 4, 10, 14, 3, 9, 12, 13, 4, 9, 13, 1, 6, 7, 13, 7, 12, 19, 10, 13, 2, 7, 9, 16, 4, 4, 8, 12, 12, 16, 7, 7, 14, 8, 14, 1, 7, 8, 15, 2, 9, 11, 12, 15, 6, 13, 6, 11, 17, 7, 8, 15, 2, 9, 11, 12
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
COMMENT
|
That ratio a[n+1]/a[n] has a wide variation but averages near: 1.40197 There are at least two faults with the Fibonacci numbers as a population model for rabbits: 1) it doesn't plateau in a sigmoid manner 2) it doesn't exhibit chaotic bifuraction A better more complete integer sequence that has these behaviors is needed.
|
|
FORMULA
|
a(n) =Mod[a(n - 1), 13] + Mod[a(n - 2), 8]
|
|
MATHEMATICA
|
a[0] = 0; a[1] = 1; a[n_] := a[n] = Mod[a[n - 1], 13] + Mod[a[n - 2], 8] aout = Table[a[n], {n, 0, 100}]
|
|
CROSSREFS
|
Cf. A000045.
Sequence in context: A107479 A117761 A018149 this_sequence A072123 A135102 A078414
Adjacent sequences: A118601 A118602 A118603 this_sequence A118605 A118606 A118607
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), May 17 2006
|
|
|
Search completed in 0.002 seconds
|
