A101456 Prime digits in the decimal expansion of Euler's constant (or Euler-Mascheroni constant) gamma.

5, 7, 7, 2, 5, 5, 3, 2, 5, 2, 2, 2, 3, 2, 5, 3, 3, 5, 3, 2, 3, 5, 5, 7, 7, 2, 3, 7, 7, 2, 7, 7, 7, 7, 3, 7, 3, 2, 7, 7, 5, 3, 7, 2, 7, 2, 5, 5, 2, 3, 2, 2, 7, 3, 7, 2, 3, 5, 3, 2, 5, 3, 5, 3, 3, 3, 7, 2, 3, 7, 3, 3, 7, 7, 3, 7, 7, 3, 2, 7, 2, 5, 5, 2, 5, 2, 7, 7, 3, 5, 2, 3, 5, 7, 5, 3, 2, 3, 3, 5, 7, 7, 5, 2, 2

Offset

0,1

Links

G. C. Greubel, Table of n, a(n) for n = 0..10000

Mathematica

Select[ RealDigits[ EulerGamma, 10, 275][[1]], PrimeQ[ # ] &] (* Robert G. Wilson v, Jan 21 2005 *)

Crossrefs

Cf. A001620, A073264, A073246.

Sequence in context: A242220 A357068 A245726 * A084823 A117034 A021638

Adjacent sequences: A101453 A101454 A101455 * A101457 A101458 A101459

Keyword

base,easy,nonn

Author

Sebastian Gutierrez (sgutierr(AT)alum.mit.edu), Jan 20 2005

Extensions

More terms from Robert G. Wilson v, Jan 21 2005

Status

approved