OFFSET
1,1
REFERENCES
Steven R. Finch, Mathematical Constants, Cambridge University Press, 2003, Section 6.8 Prouhet-Thue-Morse Constant, p. 438.
LINKS
Steven R. Finch, Errata and Addenda to Mathematical Constants, p. 56.
Eric Weisstein's MathWorld, Komornik-Loreti Constant
FORMULA
The number 'q' is the unique positive solution of Sum_{n >= 1} (1-t(n))*q^-n = 1, where t(n) = A010060(n).
EXAMPLE
2.910016055655574691986036509619791445578204031487525...
MATHEMATICA
RealDigits[ q /. FindRoot[ Sum[(1 + Mod[DigitCount[n, 2, 1], 2])/q^n, {n, 1, 2000}] == 1, {q, 3}, WorkingPrecision -> 120], 10, 100] // First
CROSSREFS
KEYWORD
AUTHOR
Jean-François Alcover, Mar 03 2015
STATUS
approved