A023179 Numbers k such that Fib(k) == 21 (mod k).

1, 2, 8, 56, 152, 248, 488, 632, 638, 872, 1112, 1178, 1208, 1448, 1592, 1688, 1832, 1928, 2168, 2648, 2792, 3032, 3272, 3368, 3512, 3536, 3608, 3992, 4148, 4328, 4568, 4628, 4808, 4952, 5048, 5288, 5528, 5672, 5912, 6008, 6152, 6488, 6632, 6872, 7352

Offset

1,2

Links

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

Mathematica

Join[{1, 2, 8}, Select[Range[7500], Mod[Fibonacci[#], #]==21&]] (* Harvey P. Dale, Sep 02 2025 *)

Crossrefs

Sequence in context: A117496 A117564 A254222 * A009298 A354175 A306087

Adjacent sequences: A023176 A023177 A023178 * A023180 A023181 A023182

Keyword

nonn

Author

David W. Wilson

Status

approved