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,2

Links

Table of n, a(n) for n=1..53.

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

Adjacent sequences: A023162 A023163 A023164 * A023166 A023167 A023168

Keyword

nonn

Author

David W. Wilson

Status

approved