OFFSET
0,1
LINKS
Tibor Šalát, On the function a_p, p^a_p(n) || n (n > 1), Mathematica Slovaca, Vol. 44, No. 2 (1994), pp. 143-151.
FORMULA
Equals Sum_{k>=1} 1/(k * 2^(k - A007814(k) + 1)).
EXAMPLE
0.435611028292172174213122545158086502293746907188068...
MATHEMATICA
RealDigits[Sum[1/k/2^(k + 1 - IntegerExponent[k, 2]), {k, 1, 1000}], 10, 100][[1]]
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Amiram Eldar, Jul 07 2020
STATUS
approved