|
|
A088563
|
|
Primes p such that the p-th digit in the decimal expansion of Pi is 0.
|
|
1
|
|
|
107, 271, 331, 367, 409, 521, 619, 683, 751, 839, 857, 997, 1013, 1117, 1123, 1361, 1439, 1483, 1489, 1601, 1607, 1609, 1747, 1831, 1889, 1913, 1999, 2131, 2137, 2251, 2341, 2671, 2819, 2887, 2957, 3011, 3019, 3169, 3203, 3253, 3299, 3331, 3407, 3413
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The 9th zero in Pi is in the 107th place of the digits 3,1,4,1,5, ...
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{pidigs=RealDigits[Pi, 10, 10000][[1]]}, Select[Prime[ Range[ 500]], pidigs[[#]]==0&]] (* Harvey P. Dale, Nov 13 2011 *)
|
|
PROG
|
(PARI) pizeros(n, d) = { default(realprecision, 5000); p = Pi; v = Vec(Str(p)); for(x=1, n, if(v[x] == Str(d) && isprime(x-1), print1(x-1", ")) ) }
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|