|
Search: id:A105500
|
|
|
| A105500 |
|
Trajectory of 1 under the morphism 1->{1,2}, 2->{3,2}, 3->{3,4}, 4->{1,4}. |
|
+0
2
|
|
| 1, 2, 3, 2, 3, 4, 3, 2, 3, 4, 1, 4, 3, 4, 3, 2, 3, 4, 1, 4, 1, 2, 1, 4, 3, 4, 1, 4, 3, 4, 3, 2, 3, 4, 1, 4, 1, 2, 1, 4, 1, 2, 3, 2, 1, 2, 1, 4, 3, 4, 1, 4, 1, 2, 1, 4, 3, 4, 1, 4, 3, 4, 3, 2, 3, 4, 1, 4, 1, 2, 1, 4, 1, 2, 3, 2, 1, 2, 1, 4, 1, 2, 3, 2, 3, 4, 3, 2, 1, 2, 3, 2, 1, 2, 1, 4, 3, 4, 1, 4, 1, 2, 1, 4, 1
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
Heighways's dragon : characteristic polynomial x^4-4*x^3+6*x^2-4*x=0.
|
|
REFERENCES
|
F. M. Dekking, "Recurrent Sets", Advances in Mathematics, vol. 44, no.1, 1982, page 89, section 4.5
|
|
MATHEMATICA
|
Flatten[ Nest[ Flatten[ # /. {1 -> {1, 2}, 2 -> {3, 2}, 3 -> {3, 4}, 4 -> {1, 4}} &], {1}, 7]]
|
|
CROSSREFS
|
Sequence in context: A076050 A130799 A106383 this_sequence A088748 A086374 A123182
Adjacent sequences: A105497 A105498 A105499 this_sequence A105501 A105502 A105503
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), May 02 2005
|
|
|
Search completed in 0.002 seconds
|
