This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A297573 #26 May 05 2018 15:48:53 %S A297573 1,1,1,2,14170,6,1,136,207,28340,979,12,1,322,385,368,1,306,17,19780, %T A297573 3,68,1,24,524975,58,2889,92,13,3570,12749,736,7,2,165,612,1,34,633, %U A297573 13160,339,6,1,1846,5355,2,1,336,8183,509950,21,116,1,918,4895,184,51,26,10207,7140 %N A297573 Least positive integer m such that m*n divides F(m+n), where F(k) denotes the k-th Fibonacci number A000045(k). %C A297573 If p is a prime congruent to 2 or 3 modulo 5, then a(p) = 1 since it is known that p divides F(p+1). %C A297573 Conjecture: a(n) exists for any n > 0. %C A297573 See also A297574 for a similar conjecture. %H A297573 Chai Wah Wu, <a href="/A297573/b297573.txt">Table of n, a(n) for n = 1..1000</a> (n = 1..120 from Zhi-Wei Sun) %H A297573 Zhi-Wei Sun, <a href="http://maths.nju.edu.cn/~zwsun/IntroLucasSeq.pdf">Introduction to Lucas sequences</a>, a talk give in 2017. %e A297573 a(2) = 1 since 1*2 divides F(1+2) = F(3) = 2. %e A297573 a(4) = 2 since 2*4 divides F(2+4) = 8. %e A297573 a(5) = 14170 since 5*14170 = 70850 divides F(5+14170) = F(14175). %e A297573 a(6) = 6 since 6*6 = 36 divides F(6+6) = F(12) = 144. %t A297573 Do[m=1; Label[aa]; If[Mod[Fibonacci[m+n], m*n]==0, Print[n, " ", m]; Goto[bb]]; m=m+1; Goto[aa]; Label[bb]; Continue, {n, 1, 60}] %t A297573 lpi[n_]:=Module[{k=1},While[!Divisible[Fibonacci[k+n],k*n],k++];k]; Array[ lpi,60] (* _Harvey P. Dale_, May 05 2018 *) %o A297573 (PARI) a(n) = my(m=1); while(1, if(Mod(fibonacci(m+n), m*n)==0, return(m)); m++) \\ _Felix Fröhlich_, Jan 01 2018 %Y A297573 Cf. A000045, A247937, A248123, A297574. %K A297573 nonn %O A297573 1,4 %A A297573 _Zhi-Wei Sun_, Jan 01 2018