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 A073340 #20 May 21 2022 14:13:58 %S A073340 3,5,5,7,11,13,431,433,569,571 %N A073340 Fibonacci prime pairs: the indices of each pair differ by two and the relevant Fibonacci numbers are both prime. %C A073340 There are no other Fibonacci prime pairs up to Fibonacci(104911). (See A001605.) Are there any larger terms? %D A073340 David Wells, The Penguin Dictionary of Curious and Interesting Numbers, Penguin Books, Rev. ed. 1997, p. 46. %e A073340 The 431st Fibonacci number and the 433rd Fibonacci number are both prime and their indices differ by 2. %t A073340 Flatten[Select[Partition[Select[Range[3000], PrimeQ[Fibonacci[ # ]]&], 2, 1], #[[2]] - #[[1]] == 2 &]] %o A073340 (Python) %o A073340 from sympy import isprime %o A073340 def afind(limit): %o A073340 i, fnm2, fnm1 = 1, 1, 1 %o A073340 while i < limit: %o A073340 if isprime(fnm2) and isprime(fnm2 + fnm1): %o A073340 print(i, i+2, sep=", ", end=", ") %o A073340 i, fnm2, fnm1 = i+1, fnm1, fnm2 + fnm1 %o A073340 afind(600) # _Michael S. Branicky_, Mar 05 2021 %Y A073340 Cf. A000045, A001605, A279795, A281087. %K A073340 more,nonn %O A073340 1,1 %A A073340 _Harvey P. Dale_, Aug 25 2002 %E A073340 Offset changed to 1 by _Joerg Arndt_, Jan 18 2017 %E A073340 a(1) and a(2) prepended by _Bobby Jacobs_, Jan 18 2017