OFFSET
0,2
COMMENTS
Equivalently, the real number in (0,1) having the characteristic function of the primes, A010051, as its base-7 expansion. - M. F. Hasler, Jul 05 2017
FORMULA
From Amiram Eldar, Aug 11 2020: (Start)
Equals Sum_{k>=1} 1/A269327(k).
Equals 6 * Sum_{k>=1} pi(k)/7^(k+1), where pi(k) = A000720(k). (End)
EXAMPLE
0.023384328960353739909859822495912373489340935935944869619982884656523568...
PROG
(PARI) /* Sum of 1/m^p for primes p */ sumnp(n, m) = { local(s=0, a, j); for(x=1, n, s+=1./m^prime(x); ); a=Vec(Str(s)); for(j=3, n, print1(eval(a[j])", ") ) }
(PARI) suminf(n=1, 1/7^prime(n)) \\ Then: digits(%\.1^default(realprecision))[1..-3] to remove the last 2 digits. N.B.: Functions sumpos() and sumnum() yield much less accurate results. - M. F. Hasler, Jul 05 2017
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Cino Hilliard, Nov 17 2007
EXTENSIONS
Offset corrected by R. J. Mathar, Feb 05 2009
Edited by M. F. Hasler, Jul 05 2017
STATUS
approved