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 A103740 #10 Jun 30 2024 13:09:21 %S A103740 1,2,3,4,5,7,8,10,11,15,41,98,149,193,233,265,403,898,935,1291,2079 %N A103740 Numbers k such that k! * F(k) + 1 is prime. %C A103740 All values through 2079 have been proved prime with WinPFGW. No more terms up to 6700. Primality testing 2079!*F(2079)+1 [N-1, Brillhart-Lehmer-Selfridge] Running N-1 test using base 2087 Running N-1 test using base 2099 Calling Brillhart-Lehmer-Selfridge with factored part 33.88% 2079!*F(2079)+1 is prime! (15.2535s+0.0043s) %C A103740 No more terms < 6729. - _David Wasserman_, Apr 24 2008 %C A103740 No more terms < 12000. - _Michael S. Branicky_, Jun 30 2024 %e A103740 a(6)=7 because 7!*fibonacci(7)+1 = 65521, a prime. %t A103740 Select[Range[410],PrimeQ[#!Fibonacci[#]+1]&] (* The program generates the first 17 terms of the sequence. *) (* _Harvey P. Dale_, Jan 30 2024 *) %Y A103740 Cf. A005443. %K A103740 nonn,less %O A103740 1,2 %A A103740 _Jason Earls_, Mar 28 2005