A074073 Denominators of iterations of Thue-Morse sequence.
1, 4, 8, 256, 32768, 4294967296, 9223372036854775808, 340282366920938463463374607431768211456, 57896044618658097711785492504343953926634992332820282019728792003956564819968
Offset: 0
Links
- Amiram Eldar, Table of n, a(n) for n = 0..12
- Eric Weisstein's World of Mathematics, Thue-Morse Constant.
Crossrefs
Cf. A074072 (numerators).
Programs
-
Mathematica
f[0] = 0; f[n_] := (2^(-2^n))*(2^(2^(n - 1)) - 1)*(2^(2^(n - 1))*f[n - 1] + 1); Denominator@ Array[f, 9, 0] (* Amiram Eldar, Oct 05 2023 *)
Extensions
a(8) from Amiram Eldar, Oct 05 2023