OEIS/morfix

Fixed points of morphisms

• cf. OEIS Index entries for sequences that are fixed points of mappings

Mathematica

(* A245553 A Rauzy fractal sequence: trajectory of 1 under morphism 1 -> 2,3; 2 -> 3; 3 -> 1.*) 
Nest[Function[k, {Flatten[(k /. {1 -> {2, 3}, 2 -> {3}, 3 -> {1} })] }], {1}, 15]