login
A225142
Primes from merging of 10 successive digits in the decimal expansion of exp(Pi).
2
1406926327, 2632779269, 9269005729, 9045278351, 9706754921, 2196759527, 3835844717, 6468440141, 6844014103, 8216511287, 8763773147, 3473538331, 6273655727, 9618858059, 5430487121, 1300849327, 9325853203, 6189528329, 6802254197, 3054479927, 4479927817
OFFSET
1,1
COMMENTS
Leading zeros are not permitted, so each prime is 10 digits in length. The terms are listed in the order in which they occur.
LINKS
MATHEMATICA
With[{len = 10}, FromDigits /@ Select[Partition[RealDigits[E^Pi, 10, 600][[1]], len, 1], PrimeQ[FromDigits[#]] && IntegerLength[FromDigits[#]] == len &]]
Select[FromDigits/@Partition[RealDigits[Exp[Pi], 10, 600][[1]], 10, 1], PrimeQ[ #] && IntegerLength[#]==10&] (* Harvey P. Dale, Aug 27 2020 *)
CROSSREFS
Cf. A105015.
Sequence in context: A114888 A347114 A105015 * A333377 A185931 A069320
KEYWORD
nonn,base
AUTHOR
Bruno Berselli, Apr 30 2013
STATUS
approved