login
A023165
Numbers k such that Fibonacci(k) == -5 (mod k).
0
1, 2, 4, 5, 10, 15, 16, 35, 40, 64, 65, 85, 115, 160, 185, 215, 235, 265, 335, 365, 415, 485, 496, 515, 535, 565, 615, 635, 685, 785, 815, 835, 865, 965, 985, 1115, 1135, 1165, 1285, 1315, 1385, 1415, 1465, 1535, 1565, 1585, 1685, 1735, 1765, 1835, 1865, 1915, 1985
OFFSET
1,2
MATHEMATICA
Join[{1, 2, 4}, Select[Range[2000], Mod[Fibonacci[#], #]==#-5&]] (* Harvey P. Dale, Mar 15 2016 *)
CROSSREFS
Cf. A000045.
Sequence in context: A228893 A272622 A097133 * A058299 A191616 A319909
KEYWORD
nonn
STATUS
approved