login
A104942
Primes from merging of 8 successive digits in decimal expansion of the Euler-Mascheroni Constant.
2
72156649, 31042159, 35939923, 93992359, 98805767, 80576723, 77766467, 36947063, 33374293, 33742937, 42937337, 33773767, 25824709, 87352039, 15286211, 28621199, 50798479, 40296043, 51028079, 80798423, 84234877
OFFSET
1,1
LINKS
Jon Borwein, 170,000 digits of Gamma [Wayback Machine copy]
Eric Weisstein's World of Mathematics, Euler-Mascheroni Constant.
MATHEMATICA
egp[len_]:=Module[{egterms=FromDigits/@Partition[RealDigits[EulerGamma, 10, 1000][[1]], len, 1]}, Select[egterms, IntegerLength[#]==len&&PrimeQ[#]&]]; egp[8] (* Harvey P. Dale, Oct 29 2011 *)
CROSSREFS
Cf. A001620.
Sequence in context: A237075 A291591 A198782 * A104849 A138058 A022228
KEYWORD
nonn,base
AUTHOR
Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
EXTENSIONS
Changed offset from 0 to 1 by Vincenzo Librandi, Apr 20 2013
STATUS
approved