%I A101457
%S A101457 3,3,7,2,5,3,3,5,3,7,7,2,3,7,5,7,2,2,3,5,2,2,7,5,2,2,2,7,7,2,7,2,3,3,7,
%T A101457 7,5,7,5,3,7,5,2,2,3,3,2,2,2,3,5,3,3,7,3,7,7,2,3,5,3,3,3,5,5,3,5,2,5,3,
%U A101457 3,2,2,3,2,2,2,7,7,5,2,7,2,5,7,2,7,3,2,2,2,3,2,2,5,2,2,3,3,3,7,5,7,2,2
%N A101457 Prime digits in the decimal expansion of golden ratio phi (or tau) = 
               (1 + sqrt 5 )/2.
%t A101457 Select[ RealDigits[ GoldenRatio, 10, 275][[1]], PrimeQ[ # ] &] (from 
               Robert G. Wilson v Jan 21 2005)
%Y A101457 Cf. A001622, A073264, A073246.
%Y A101457 Sequence in context: A114187 A118031 A059527 this_sequence A076217 A089488 
               A076560
%Y A101457 Adjacent sequences: A101454 A101455 A101456 this_sequence A101458 A101459 
               A101460
%K A101457 base,easy,nonn
%O A101457 0,1
%A A101457 Sebastian Gutierrez (sgutierr(AT)alum.mit.edu), Jan 20 2005
%E A101457 More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 21 2005.