A101668 Fixed point of morphism 0 -> 01, 1 -> 20, 2 -> 00.

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

Offset

0,3

Links

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

Index entries for sequences that are fixed points of mappings

Mathematica

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

Crossrefs

Sequence in context: A216283 A262900 A242830 * A387685 A141846 A386888

Adjacent sequences: A101665 A101666 A101667 * A101669 A101670 A101671

Keyword

nonn,easy

Author

Ralf Stephan, Dec 11 2004

Status

approved