

A100619


Fixed point of the morphism 1 > 12, 2 > 31, 3 > 1, starting from a(1) = 1.


7



1, 2, 3, 1, 1, 1, 2, 1, 2, 1, 2, 3, 1, 1, 2, 3, 1, 1, 2, 3, 1, 1, 1, 2, 1, 2, 3, 1, 1, 1, 2, 1, 2, 3, 1, 1, 1, 2, 1, 2, 1, 2, 3, 1, 1, 2, 3, 1, 1, 1, 2, 1, 2, 1, 2, 3, 1, 1, 2, 3, 1, 1, 1, 2, 1, 2, 1, 2, 3, 1, 1, 2, 3, 1, 1, 2, 3, 1, 1, 1, 2, 1, 2, 3, 1, 1, 1, 2, 1, 2, 1, 2, 3, 1, 1, 2, 3, 1, 1, 2, 3, 1, 1, 1, 2
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

Sirvent comments that in spite of the similarity of this map to the one in A092782, the two sequences have very different properties. They have different complexities, different Rauzy fractals, etc.


LINKS



MAPLE

f(1):= (1, 2): f(2):= (3, 1): f(3):= (1): B:= [1]:
for i from 1 to 12 do B:= map(f, B) od:


MATHEMATICA

Nest[ Function[l, {Flatten[(l /. {1 > {1, 2}, 2 > {3, 1}, 3 > {1}})]}], {1}, 7][[1]] (* Robert G. Wilson v, Feb 26 2005 *)


CROSSREFS



KEYWORD

nonn,easy


AUTHOR



EXTENSIONS



STATUS

approved



