A103682 Trajectory of 1 under repeated applications of the morphism 1-> {1,2}, 2->{1,2,3}, 3->{1,1,3}.

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

Offset

1,3

Links

Table of n, a(n) for n=1..105.

Index entries for sequences that are fixed points of mappings

Mathematica

s[1] = {1, 2}; s[2] = {1, 2, 3}; s[3] = {1, 1, 3}; t[a_] := Join[a, Flatten[s /@ a]]; a = t[t[t[t[t[{1}]]]]]

Crossrefs

Cf. A073058.

Sequence in context: A161285 A235189 A308452 * A023134 A304536 A272863

Adjacent sequences: A103679 A103680 A103681 * A103683 A103684 A103685

Keyword

nonn

Author

Roger L. Bagula, Mar 26 2005

Status

approved