A023165 Numbers k such that Fibonacci(k) == -5 (mod k).

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

Author

David W. Wilson

Keywords

• nonn

Crossrefs

Cf. A000045.

Programs

Mathematica

Join[{1,2,4},Select[Range[2000],Mod[Fibonacci[#],#]==#-5&]] (* Harvey P. Dale, Mar 15 2016 *)