OFFSET
0,1
MATHEMATICA
Select[ RealDigits[ GoldenRatio, 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