login
A272304
Position of the first n-digit prime occurring in the decimal expansion of e.
2
1, 2, 1, 15, 25, 13, 1, 65, 20, 100, 38, 54, 8, 48, 40, 41, 9, 83, 152, 19, 52, 6, 16, 66, 4, 4, 69, 25, 28, 7, 97, 174, 4, 48, 127, 11, 40, 58, 48, 69, 45, 40, 34, 119, 6, 7, 92, 61, 2, 40, 138, 105, 332, 28, 70, 322, 62, 231, 78, 339, 245, 66, 49, 439, 298
OFFSET
1,2
COMMENTS
Leading zeros are not allowed.
LINKS
EXAMPLE
a(1) = 1 because the initial digit "2" of e is prime.
MATHEMATICA
With[{ed = RealDigits[E, 10, 10000][[1]]}, Table[Position[Partition[ed, n, 1], _?(PrimeQ[FromDigits[#]] && #[[1]] != 0 &), {1}, 1, Heads -> False], {n, 100}]] // Flatten
CROSSREFS
Sequence in context: A141510 A219899 A326600 * A266521 A039652 A374264
KEYWORD
nonn,base
AUTHOR
Harvey P. Dale, Apr 25 2016
STATUS
approved