A101666 Fixed point of morphism 0 -> 01, 1 -> 12, 2 -> 10, starting with 0.

0, 1, 1, 2, 1, 2, 1, 0, 1, 2, 1, 0, 1, 2, 0, 1, 1, 2, 1, 0, 1, 2, 0, 1, 1, 2, 1, 0, 0, 1, 1, 2, 1, 2, 1, 0, 1, 2, 0, 1, 1, 2, 1, 0, 0, 1, 1, 2, 1, 2, 1, 0, 1, 2, 0, 1, 0, 1, 1, 2, 1, 2, 1, 0, 1, 2, 1, 0, 1, 2, 0, 1, 1, 2, 1, 0, 0, 1, 1, 2, 1, 2, 1, 0, 1, 2, 0, 1, 0, 1, 1, 2, 1, 2, 1, 0, 1, 2, 1, 0, 1, 2, 0, 1, 1

Offset

0,4

Comments

Let u be the sequence of positions of 0, and likewise, v for 1 and w for 2. Let U, V, W be the limits of u(n)/n, v(n)/n, w(n)/n, respectively. Then U = 4, V = 2, W = 4. - Clark Kimberling, May 25 2017

Links

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

Index entries for sequences that are fixed points of mappings

Example

The first five iterates of the morphism are as follows:
01
0112
01121210
0112121012101201
01121210121012011210120112100112
- Clark Kimberling, May 25 2017

Mathematica

Nest[ Function[ l, {Flatten[(l /. {0 -> {0, 1}, 1 -> {1, 2}, 2 -> {1, 0}}) ]}], {0}, 7] (* Robert G. Wilson v, Mar 03 2005 *)

Crossrefs

Cf. A287373, A287374, A287375.

Sequence in context: A102565 A076826 A137178 * A035224 A272677 A367739

Adjacent sequences: A101663 A101664 A101665 * A101667 A101668 A101669

Keyword

nonn,easy

Author

Ralf Stephan, Dec 11 2004

Status

approved