A374724 Quartet paradiddle Thue-Morse, with axiom {1} and morphism 1->{1,2,3,4,1,1}, 2->{2,1,4,3,2,2}, 3->{3,4,1,2,3,3}, 4->{4,3,2,1,4,4}.

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

Offset

0,2

Links

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

Index entries for sequences that are fixed points of mappings

Mathematica

SubstitutionSystem[{1 -> {1, 2, 3, 4, 1, 1}, 2 -> {2, 1, 4, 3, 2, 2}, 3 -> {3, 4, 1, 2, 3, 3}, 4 -> {4, 3, 2, 1, 4, 4}}, {1}, {3}] // Flatten

Crossrefs

Cf. A010059, A010060.

Cf. A374646.

Sequence in context: A332937 A350351 A138297 * A139458 A277543 A190594

Adjacent sequences: A374721 A374722 A374723 * A374725 A374726 A374727

Keyword

nonn,easy

Author

Robert P. P. McKone, Jul 17 2024

Status

approved