A115019 Position of the first n-digit prime in the decimal expansion of e=exp(1).
0, 1, 0, 14, 13, 12, 0, 64, 19, 99, 37, 53, 7, 47, 39, 40, 8, 82, 151, 18, 51, 5, 15, 65, 3, 3, 68, 24, 27, 6, 96, 173, 3, 47, 126, 10, 39, 57, 47, 68, 44, 39, 33, 118, 5, 6, 91, 60, 1, 39, 137, 104, 331, 27, 69, 321, 61, 230, 77, 236, 244, 65, 48, 438, 297, 92, 359, 40, 214
Offset: 1
Programs
-
PARI
\p10000 e=exp(1): f(i,l)=lift(Mod(floor(e*10^(l-1+i)),10^l)) prem(l)=local(i);i=0;while(!isprime(f(i,l)),i++);i for(l=1,1000,write(indices,Str(prem(l) ", ")))
Comments