A106689 Limiting word of the morphism 1->11321, 2->22312, 3->33213 starting from 1.

1, 1, 3, 2, 1, 1, 1, 3, 2, 1, 3, 3, 2, 1, 3, 2, 2, 3, 1, 2, 1, 1, 3, 2, 1, 1, 1, 3, 2, 1, 1, 1, 3, 2, 1, 3, 3, 2, 1, 3, 2, 2, 3, 1, 2, 1, 1, 3, 2, 1, 3, 3, 2, 1, 3, 3, 3, 2, 1, 3, 2, 2, 3, 1, 2, 1, 1, 3, 2, 1, 3, 3, 2, 1, 3, 2, 2, 3, 1, 2, 2, 2, 3, 1, 2, 3, 3, 2, 1, 3, 1, 1, 3, 2, 1, 2, 2, 3, 1, 2, 1, 1, 3, 2, 1

Offset

0,3

Links

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

Mathematica

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

Crossrefs

Sequence in context: A079948 A257657 A339584 * A348177 A027082 A140736

Adjacent sequences: A106686 A106687 A106688 * A106690 A106691 A106692

Keyword

nonn

Author

Roger L. Bagula, May 13 2005

Extensions

Edited by Sean A. Irvine, May 27 2026

Status

approved