A106749 Define the morphism f: 1->113, 2->13, 3->2; sequence gives trajectory of 1 under f.

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

Offset: 0

Author

N. J. A. Sloane, May 16 2005

Keywords

• nonn
• easy

References

• E. Bombieri and J. Taylor, Which distribution of matter diffracts? An initial investigation, in International Workshop on Aperiodic Crystals (Les Houches, 1986), J. de Physique, Colloq. C3, 47 (1986), C3-19 to C3-28.

Links

• Index entries for sequences that are fixed points of mappings

Crossrefs

Cf. A106748.

Programs

Mathematica

Nest[ Flatten[ # /. {1 -> {1, 1, 3}, 2 -> {1, 3}, 3 -> 2}] &, {1}, 6] (* Robert G. Wilson v, May 17 2005 *)

Extensions

More terms from Robert G. Wilson v, May 17 2005