|
%I #24 Mar 11 2024 08:28:46
%S 0,2,6,150,27030,2523490710,7608434000728254870,
%T 199931532107794273605284333428918544790,
%U 47758914269546354982683078068829456704164423862093743397580034411621752859030
%N Consider the Thue-Morse sequence (A010060) at each iteration. Read each reversed string as a binary number and convert it to a decimal number.
%e The first three terms of A010060 are 0, 1, 1, so a(3) = 110_2 = 6.
%t FromDigits[ #, 2] & /@ NestList[Flatten[ # /. {1 -> {0, 1}, 0 -> {1, 0}}] &, {0}, 8] (* _Robert G. Wilson v_, Sep 25 2006 *)
%Y Cf. A010060, A014571.
%K nonn,base,less
%O 1,2
%A _Roger L. Bagula_, Sep 17 2006
%E Edited by _Robert G. Wilson v_, Sep 25 2006
|
