OFFSET
1,2
COMMENTS
a(33) > 2*10^9. - Giovanni Resta, Jul 20 2013
MATHEMATICA
Select[Range[3*10^4], Mod[Fibonacci[ # ], # ] == Mod[Prime[ # ], # ] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Joseph L. Pe, Oct 17 2002
EXTENSIONS
a(13)-a(32) from Giovanni Resta, Jul 20 2013
STATUS
approved