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.

A104937 Primes from merging of 3 successive digits in decimal expansion of the Euler-Mascheroni constant.

This page as a plain text file.
%I A104937 #17 Feb 16 2025 08:32:57
%S A104937 577,431,421,593,359,593,359,677,677,467,709,947,467,463,631,809,401,
%T A104937 283,241,173,739,997,449,353,337,293,937,373,733,337,773,673,739,709,
%U A104937 491,853,233,331,151,661,211,199,479,937,857,547,421,151,587,877,673
%N A104937 Primes from merging of 3 successive digits in decimal expansion of the Euler-Mascheroni constant.
%C A104937 Leading zeros are not permitted, so each term is 3 digits in length. - _Harvey P. Dale_, Oct 30 2011
%H A104937 Vincenzo Librandi, <a href="/A104937/b104937.txt">Table of n, a(n) for n = 1..4000</a>
%H A104937 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Euler-MascheroniConstant.html">Euler-Mascheroni Constant</a>.
%H A104937 The first <a href="http://www.worldwideschool.org/library/books/sci/math/MiscellaneousMathematicalConstants/chap35.html">170,000 digits of the Euler Constant</a> as calculated by Jon Borwein at WorldWideSchool.org.
%t A104937 egp[len_]:=Module[{egterms=FromDigits/@Partition[RealDigits[EulerGamma, 10, 1000][[1]],len,1]},Select[egterms,IntegerLength[#]==len&&PrimeQ[#]&]];egp[3] (* _Harvey P. Dale_, Oct 30 2011 *)
%Y A104937 Cf. A198777.
%K A104937 nonn,base
%O A104937 1,1
%A A104937 Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
%E A104937 Offset changed from 0 to 1 by _Vincenzo Librandi_, Apr 20 2013