login
A023170
Numbers k such that Fibonacci(k) == -55 (mod k).
0
1, 2, 3, 5, 10, 20, 70, 110, 116, 130, 170, 230, 285, 322, 370, 430, 470, 494, 530, 555, 620, 670, 730, 770, 830, 970, 1030, 1070, 1130, 1270, 1334, 1370, 1570, 1630, 1670, 1730, 1930, 1970, 2230, 2270, 2330, 2530, 2570, 2630, 2770, 2830, 2870, 2930, 3070
OFFSET
1,2
MATHEMATICA
Select[ Range[ 3100], Mod[ Mod[ Fibonacci[ #], #] + 55 - #, #] == 0 &] (* Harvey P. Dale, Jan 20 2012, modified by Robert G. Wilson v Sep 04 2013 *)
CROSSREFS
Cf. A000045.
Sequence in context: A367216 A352945 A076834 * A125312 A300550 A014626
KEYWORD
nonn
STATUS
approved