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 A104939 #15 Feb 16 2025 08:32:57
%S A104939 64901,59399,48677,77267,26777,66467,36947,32917,17467,49807,24809,
%T A104939 92353,50033,74293,42937,37337,33773,79259,24709,70949,16567,70853,
%U A104939 53233,33151,31517,28621,62119,79847,98479,84793,50857,29921,14669
%N A104939 Primes from merging of 5 successive digits in decimal expansion of the Euler-Mascheroni Constant.
%H A104939 Vincenzo Librandi, <a href="/A104939/b104939.txt">Table of n, a(n) for n = 1..1000</a>
%H A104939 Jon Borwein, <a href="https://web.archive.org/web/20060212094503/http://www.worldwideschool.org/library/books/sci/math/MiscellaneousMathematicalConstants/chap35.html">170,000 digits of Gamma</a> [Wayback Machine copy]
%H A104939 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Euler-MascheroniConstant.html">Euler-Mascheroni Constant</a>.
%t A104939 egp[len_] := Module[{egterms = FromDigits/@Partition[RealDigits[EulerGamma, 10, 1000][[1]], len, 1]}, Select[egterms, IntegerLength[#] == len&&PrimeQ[#]&]]; egp[5] (* _Vincenzo Librandi_, Apr 20 2013 *)
%Y A104939 Cf. A001620.
%K A104939 nonn,base
%O A104939 1,1
%A A104939 Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
%E A104939 Changed offset from 0 to 1 by _Vincenzo Librandi_, Apr 20 2013