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.

A104943 Primes from merging of 9 successive digits in decimal expansion of the Euler-Mascheroni Constant.

This page as a plain text file.
%I A104943 #17 Feb 16 2025 08:32:57
%S A104943 215664901,593359399,235988057,362241739,739976449,337429373,
%T A104943 733773767,670853233,146694029,151905877,267331399,413954911,
%U A104943 984234877,384310939,310939973,939973613,306088933,759271351,549570661,789358679,725203621
%N A104943 Primes from merging of 9 successive digits in decimal expansion of the Euler-Mascheroni Constant.
%H A104943 Vincenzo Librandi, <a href="/A104943/b104943.txt">Table of n, a(n) for n = 1..1000</a>
%H A104943 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 A104943 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Euler-MascheroniConstant.html">Euler-Mascheroni Constant</a>.
%t A104943 egp[len_]:=Module[{egterms=FromDigits/@Partition[RealDigits[EulerGamma, 10, 1000][[1]], len, 1]}, Select[egterms, IntegerLength[#]==len&&PrimeQ[#]&]]; egp[9] (* _Harvey P. Dale_, Oct 29 2011 *)
%Y A104943 Cf. A001620.
%K A104943 nonn,base
%O A104943 1,1
%A A104943 Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
%E A104943 Changed offset from 0 to 1 by _Vincenzo Librandi_, Apr 20 2013