login
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
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
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. A374646.
Sequence in context: A332937 A350351 A138297 * A139458 A277543 A190594
KEYWORD
nonn,easy
AUTHOR
Robert P. P. McKone, Jul 17 2024
STATUS
approved