A104849 Primes from merging of 8 successive digits in decimal expansion of e.

72407663, 40766303, 54759457, 57138217, 20030599, 98807531, 15738341, 83418793, 34884167, 84167509, 22648001, 10753907, 20695517, 38606261, 82656029, 29760673, 13200709, 27443747, 74704723, 69772093, 92836819

Offset

1,1

Comments

Leading zeros are not permitted, so each term is 8 digits in length. - Harvey P. Dale, Oct 23 2011

Links

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

Mathematica

With[{len=8}, FromDigits/@Select[Partition[RealDigits[E, 10, 1000][[1]], len, 1], PrimeQ[FromDigits[#]]&&IntegerLength[FromDigits[#]]==len&]] (* Harvey P. Dale, Oct 23 2011 *)

Crossrefs

Cf. A104843-A104862.

Sequence in context: A291591 A198782 A104942 * A138058 A022228 A032431

Adjacent sequences: A104846 A104847 A104848 * A104850 A104851 A104852

Keyword

nonn,base

Author

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

Extensions

Offset changed from 0 to 1 by Vincenzo Librandi, Apr 21 2013

Status

approved