A106652 Limiting word of the morphism 1->{2}, 2->{3}, 3->{4}, 4->{5}, 5->{1, 2, 3, 4, 5}, starting with axiom 1.

2, 3, 4, 5, 1, 2, 3, 4, 5, 3, 4, 5, 1, 2, 3, 4, 5, 2, 3, 4, 5, 1, 2, 3, 4, 5, 4, 5, 1, 2, 3, 4, 5, 2, 3, 4, 5, 1, 2, 3, 4, 5, 3, 4, 5, 1, 2, 3, 4, 5, 2, 3, 4, 5, 1, 2, 3, 4, 5, 5, 1, 2, 3, 4, 5, 2, 3, 4, 5, 1, 2, 3, 4, 5, 3, 4, 5, 1, 2, 3, 4, 5, 2, 3, 4, 5, 1, 2, 3, 4, 5, 4, 5, 1, 2, 3, 4, 5, 2, 3, 4, 5, 1, 2, 3

Offset

0,1

Links

Table of n, a(n) for n=0..104.

Mathematica

s[1] = {2}; s[2] = {3}; s[3] = {4}; s[4] = {5}; s[5] = {1, 2, 3, 4, 5};
t[a_] := Flatten[s /@ a];
p[0] = {1}; p[1] = t[p[0]];
p[n_] := t[p[n - 1]]
aa = p[11]

Crossrefs

Sequence in context: A010884 A339146 A105932 * A338479 A193106 A338491

Adjacent sequences: A106649 A106650 A106651 * A106653 A106654 A106655

Keyword

nonn,easy,less

Author

Roger L. Bagula, May 12 2005

Status

approved