OFFSET
1,16
LINKS
Antti Karttunen, Table of n, a(n) for n = 1..65537
FORMULA
Asymptotic mean: Limit_{m->oo} (1/m) * Sum_{k=1..m} a(k) = Sum_{p prime, k>=1} 1/(p^(2^k) - 1) = 0.63710219855356676263... . - Amiram Eldar, Jan 21 2024
MATHEMATICA
f[p_, e_] := e - DigitCount[e, 2, 1]; a[1] = 0; a[n_] := Plus @@ f @@@ FactorInteger[n]; Array[a, 100] (* Amiram Eldar, Jan 21 2024 *)
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Aug 24 2018
STATUS
approved