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.

A272304 Position of the first n-digit prime occurring in the decimal expansion of e.

This page as a plain text file.
%I A272304 #10 Jul 22 2020 11:39:24
%S A272304 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,
%T A272304 4,69,25,28,7,97,174,4,48,127,11,40,58,48,69,45,40,34,119,6,7,92,61,2,
%U A272304 40,138,105,332,28,70,322,62,231,78,339,245,66,49,439,298
%N A272304 Position of the first n-digit prime occurring in the decimal expansion of e.
%C A272304 Leading zeros are not allowed.
%H A272304 Harvey P. Dale, <a href="/A272304/b272304.txt">Table of n, a(n) for n = 1..200</a>
%e A272304 a(1) = 1 because the initial digit "2" of e is prime.
%t A272304 With[{ed = RealDigits[E, 10, 10000][[1]]}, Table[Position[Partition[ed, n, 1], _?(PrimeQ[FromDigits[#]] && #[[1]] != 0 &), {1}, 1, Heads -> False], {n, 100}]] // Flatten
%Y A272304 Cf. A001113, A198344.
%K A272304 nonn,base
%O A272304 1,2
%A A272304 _Harvey P. Dale_, Apr 25 2016