A023165 - OEIS

%I #11 Apr 11 2022 12:23:14

%S 1,2,4,5,10,15,16,35,40,64,65,85,115,160,185,215,235,265,335,365,415,

%T 485,496,515,535,565,615,635,685,785,815,835,865,965,985,1115,1135,

%U 1165,1285,1315,1385,1415,1465,1535,1565,1585,1685,1735,1765,1835,1865,1915,1985

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

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

%Y Cf. A000045.

%K nonn

%O 1,2

%A _David W. Wilson_