%I A101456
%S A101456 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,
%T A101456 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,
%U A101456 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
%N A101456 Prime digits in the decimal expansion of Euler's constant (or Euler-Mascheroni 
               constant) gamma.
%t A101456 Select[ RealDigits[ EulerGamma, 10, 275][[1]], PrimeQ[ # ] &] (from Robert 
               G. Wilson v Jan 21 2005).
%Y A101456 Cf. A001620, A073264, A073246.
%Y A101456 Sequence in context: A138306 A154802 A001620 this_sequence A084823 A117034 
               A021638
%Y A101456 Adjacent sequences: A101453 A101454 A101455 this_sequence A101457 A101458 
               A101459
%K A101456 base,easy,nonn
%O A101456 0,1
%A A101456 Sebastian Gutierrez (sgutierr(AT)alum.mit.edu), Jan 20 2005
%E A101456 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 21 2005