%I #21 Jul 24 2021 06:04:25
%S 1,2,3,5,10,20,70,110,116,130,170,230,285,322,370,430,470,494,530,555,
%T 620,670,730,770,830,970,1030,1070,1130,1270,1334,1370,1570,1630,1670,
%U 1730,1930,1970,2230,2270,2330,2530,2570,2630,2770,2830,2870,2930,3070
%N Numbers k such that Fibonacci(k) == -55 (mod k).
%t Select[ Range[ 3100], Mod[ Mod[ Fibonacci[ #], #] + 55 - #, #] == 0 &] (* _Harvey P. Dale_, Jan 20 2012, modified by _Robert G. Wilson v_ Sep 04 2013 *)
%Y Cf. A000045.
%K nonn
%O 1,2
%A _David W. Wilson_