|
| |
|
|
A105499
|
|
Trajectory of 1 under the morphism 1->{2,1,2}, 2->{1,3,1}, 3->{3,2,3}.
|
|
0
| |
|
|
2, 1, 2, 3, 2, 3, 2, 1, 2, 1, 3, 1, 2, 1, 2, 1, 3, 1, 2, 1, 2, 3, 2, 3, 2, 1, 2, 3, 2, 3, 1, 3, 1, 3, 2, 3, 2, 1, 2, 3, 2, 3, 2, 1, 2, 3, 2, 3, 1, 3, 1, 3, 2, 3, 2, 1, 2, 3, 2, 3, 2, 1, 2, 1, 3, 1, 2, 1, 2, 1, 3, 1, 2, 1, 2, 3, 2, 3, 2, 1, 2, 1, 3, 1, 2, 1, 2, 1, 3, 1, 3, 2, 3, 1, 3, 1, 3, 2, 3, 1, 3, 1, 2, 1, 2
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
COMMENTS
| Permutation of terdragon, characteristic polynomial -x^3+3*x^2+3*x-9=0.
|
|
|
REFERENCES
| F. M. Dekking, "Recurrent Sets", Advances in Mathematics, vol. 44, no. 1, 1982, page 94, section 4.10
|
|
|
MATHEMATICA
| Flatten[ Nest[ Flatten[ # /. {1 -> {2, 1, 2}, 2 -> {1, 3, 1}, 3 -> {3, 2, 3}} &], {1}, 5]]
|
|
|
CROSSREFS
| Sequence in context: A051329 A173964 A205710 * A005812 A136625 A086520
Adjacent sequences: A105496 A105497 A105498 * A105500 A105501 A105502
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger Bagula (rlbagulatftn(AT)yahoo.com), May 02 2005
|
| |
|
|
