cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A225142 Primes from merging of 10 successive digits in the decimal expansion of exp(Pi).

This page as a plain text file.
%I A225142 #13 Aug 27 2020 14:09:35
%S A225142 1406926327,2632779269,9269005729,9045278351,9706754921,2196759527,
%T A225142 3835844717,6468440141,6844014103,8216511287,8763773147,3473538331,
%U A225142 6273655727,9618858059,5430487121,1300849327,9325853203,6189528329,6802254197,3054479927,4479927817
%N A225142 Primes from merging of 10 successive digits in the decimal expansion of exp(Pi).
%C A225142 Leading zeros are not permitted, so each prime is 10 digits in length. The terms are listed in the order in which they occur.
%H A225142 Bruno Berselli, <a href="/A225142/b225142.txt">Table of n, a(n) for n = 1..1000</a>
%H A225142 Simon Plouffe, <a href="http://www.worldwideschool.org/library/books/sci/math/MiscellaneousMathematicalConstants/chap28.html">exp(Pi) to 5000 digits</a>
%t A225142 With[{len = 10}, FromDigits /@ Select[Partition[RealDigits[E^Pi, 10, 600][[1]], len, 1], PrimeQ[FromDigits[#]] && IntegerLength[FromDigits[#]] == len &]]
%t A225142 Select[FromDigits/@Partition[RealDigits[Exp[Pi],10,600][[1]],10,1],PrimeQ[ #] && IntegerLength[#]==10&] (* _Harvey P. Dale_, Aug 27 2020 *)
%Y A225142 Cf. A039661, A105007 - A105014.
%Y A225142 Cf. A105015.
%K A225142 nonn,base
%O A225142 1,1
%A A225142 _Bruno Berselli_, Apr 30 2013