A101457 Prime digits in the decimal expansion of golden ratio phi (or tau) = (1 + sqrt 5 )/2.

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, 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, 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

Offset: 0

Author

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

Keywords

• base
• easy
• nonn

Crossrefs

Cf. A001622, A073264, A073246.

Programs

Mathematica

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

Extensions

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