OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..300
MATHEMATICA
Select[ Range[ 2, 100000 ], ! PrimeQ[ # ] && Mod[ Fibonacci[ # ] - JacobiSymbol[ #, 5 ], # ] == 0 && JacobiSymbol[ #, 5 ] == 1 & ]
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Apr 29 2004
EXTENSIONS
More terms from Eric Rowland, Apr 29 2004
More terms from Ryan Propper, Jul 21 2006
STATUS
approved