login
A256936
Decimal expansion of Sum_{k>=1} phi(k)/2^k, where phi is Euler's totient function.
4
1, 3, 6, 7, 6, 3, 0, 8, 0, 1, 9, 8, 5, 0, 2, 2, 3, 5, 0, 7, 9, 0, 5, 0, 8, 1, 4, 6, 2, 1, 3, 0, 8, 8, 1, 3, 9, 0, 7, 4, 8, 9, 1, 9, 9, 8, 9, 6, 2, 7, 9, 4, 8, 5, 2, 9, 5, 6, 5, 9, 8, 4, 6, 3, 7, 6, 2, 1, 5, 6, 7, 1, 0, 3, 9, 7, 6, 6, 8, 7, 4, 4, 5, 5, 0, 3, 7, 9, 0, 0, 7, 0, 5, 4, 2, 8, 2, 8, 0
OFFSET
1,2
COMMENTS
Equals p + 1/2, where p is the asymptotic probability that two positive even integers selected independently at random have coprime 2-adic valuations (A007814). - Amiram Eldar, Mar 15 2026
REFERENCES
Richard K. Guy, Unsolved Problems in Number Theory, Springer, 2004, p. 139.
LINKS
Thomas Bloom, Problem 249, Erdős Problems.
Paul Erdős and Ronald L. Graham, Old and new problems and results in combinatorial number theory, Monographies de L'Enseignement Mathématique, L'enseignement Mathématique, Université de Genève, 1980, p. 61.
Erdős problems database contributors, Erdős problem database, see no. 249.
Eric Weisstein's MathWorld, Totient Function.
FORMULA
Equals Sum_{k>=1} A007431(k)/(2^k - 1). - Amiram Eldar, Jun 23 2020
Equals 1/2 + Sum_{k>=1} mu(k)/(2^k-1)^2, where mu is the Moebius function (A008683). - Amiram Eldar, Mar 15 2026
EXAMPLE
1.36763080198502235079050814621308813907489199896...
MATHEMATICA
digits = 99; m0 = 10; dd = 10; Clear[f]; f[m_] := f[m] = Sum[EulerPhi[n]/2^n, {n, 1, m}] // N[#, digits + 2*dd]&; f[m = m0] ; While[RealDigits[f[2*m], 10, digits + dd ] != RealDigits[f[m], 10, digits + dd ], m = 2*m; Print[m]]; RealDigits[f[m], 10, digits] // First
PROG
(PARI) suminf(n=1, eulerphi(n)/2^n) \\ Charles R Greathouse IV, Apr 20 2016
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
STATUS
approved