|
|
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
|
|
|
|