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.
%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