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 A104845 #10 Dec 14 2014 06:19:53 %S A104845 4523,8747,7757,7247,5749,6967,6277,3547,4759,3821,6427,4663,3919, %T A104845 2003,1741,9043,4357,8627,4349,6323,8807,5101,1019,1901,9011,1879, %U A104845 1499,4993,2447,7741,7411,8537,4243,2437,3907,2069,9551,7027,6133,3313,4583,4493 %N A104845 Primes from merging of 4 successive digits in decimal expansion of e. %C A104845 Leading zeros are not permitted, so each term is 4 digits in length. - _Harvey P. Dale_, Oct 23 2011 %H A104845 Vincenzo Librandi, <a href="/A104845/b104845.txt">Table of n, a(n) for n = 1..1000</a> %t A104845 With[{len=4},FromDigits/@Select[Partition[RealDigits[E,10,1000][[1]], len,1],PrimeQ[FromDigits[#]]&&IntegerLength[FromDigits[#]]==len&]] (* _Harvey P. Dale_, Oct 23 2011 *) %Y A104845 Cf. A104843-A104862. %K A104845 nonn,base %O A104845 1,1 %A A104845 Andrew G. West (WestA(AT)wlu.edu), Mar 27 2005 %E A104845 Offset changed from 0 to 1 by _Vincenzo Librandi_, Apr 21 2013