A105009 Primes from merging of 4 successive digits in decimal expansion of exp(Pi).

6367, 1993, 1697, 6971, 9719, 1997, 7549, 4801, 1087, 4441, 8447, 5879, 2689, 6899, 1013, 7417, 1039, 7243, 8059, 5881, 7841, 1367, 3671, 3821, 4703, 3833, 2129, 4789, 5443, 1823, 8237, 8059, 4547, 5479, 7901, 9013, 2659, 5101, 1499, 9643, 4229, 1607

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

The first 5,000 digits of exp(PI) as calculated by Simon Plouffe at WorldWideSchool.org.

Eric Weisstein, Exponential Functions

Mathematica

Select[FromDigits /@ Partition[RealDigits[Exp[Pi], 10, 500][[1]], 4, 1], # > 999 && PrimeQ[#] &] (* Vincenzo Librandi, Apr 27 2013 *)

Crossrefs

Cf. A039661.

Sequence in context: A117050 A292040 A203044 * A237380 A251406 A278187

Adjacent sequences: A105006 A105007 A105008 * A105010 A105011 A105012

Keyword

nonn,base

Author

Andrew G. West (WestA(AT)wlu.edu), Mar 31 2005

Extensions

Changed offset from 0 to 1 by Vincenzo Librandi, Apr 27 2013

Status

approved