login
A248628
Least positive integer m such that prime(m+n) divides the m-th Fibonacci number F(m) given by A000045.
1
183, 22, 15, 56, 42, 320, 138, 852, 93, 90, 19, 39, 11, 2100, 956, 140, 921, 341, 44, 78, 644, 13160, 212, 22, 26, 855, 333330, 815, 1032, 221, 400, 28, 1188, 49897, 296, 369, 731, 13, 680, 42, 144, 651, 46, 4105, 626, 52, 204, 5529, 310, 525, 4557, 441, 128, 9768, 102, 106, 168, 442
OFFSET
1,1
LINKS
EXAMPLE
a(2) = 22 since prime(22+2) = 89 divides F(22) = 17711 = 89*199.
MATHEMATICA
Do[m=1; Label[aa]; If[Mod[Fibonacci[m], Prime[m+n]]==0, Print[n, " ", m]; Goto[bb]]; m=m+1; Goto[aa]; Label[bb]; Continue, {n, 1, 58}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Zhi-Wei Sun, Oct 10 2014
STATUS
approved