Nothing Special   »   [go: up one dir, main page]

login
A101456
Prime digits in the decimal expansion of Euler's constant (or Euler-Mascheroni constant) gamma.
1
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
MATHEMATICA
Select[ RealDigits[ EulerGamma, 10, 275][[1]], PrimeQ[ # ] &] (* Robert G. Wilson v, Jan 21 2005 *)
CROSSREFS
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