%I #27 Jan 07 2025 20:28:31
%S 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,
%T 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,
%U 4,3,2,2,3,4,1,2,3,3,4,3,2,1,4,4
%N 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}.
%H Robert P. P. McKone, <a href="/A374724/b374724.txt">Table of n, a(n) for n = 0..46655</a>
%H <a href="/index/Fi#FIXEDPOINTS">Index entries for sequences that are fixed points of mappings</a>
%t 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
%Y Cf. A010059, A010060.
%Y Cf. A374646.
%K nonn,easy
%O 0,2
%A _Robert P. P. McKone_, Jul 17 2024