login
A104943
Primes from merging of 9 successive digits in decimal expansion of the Euler-Mascheroni Constant.
2
215664901, 593359399, 235988057, 362241739, 739976449, 337429373, 733773767, 670853233, 146694029, 151905877, 267331399, 413954911, 984234877, 384310939, 310939973, 939973613, 306088933, 759271351, 549570661, 789358679, 725203621
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[9] (* Harvey P. Dale, Oct 29 2011 *)
CROSSREFS
Cf. A001620.
Sequence in context: A180689 A251522 A198783 * A250599 A114672 A268313
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