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 A321792 #42 Apr 18 2025 18:14:56 %S A321792 5,11,17,29,278207,63661259146337 %N A321792 Lesser of twin primes of the form 6*Fibonacci(k)-1. %C A321792 Corresponding values for k are 1 or 2, 3, 4, 5, 24, 64, ... Also a(7), if it exists, exceeds 6*Fibonacci(150000). %e A321792 17 = 6*Fibonacci(4) - 1 = 6*3 - 1. %t A321792 Select[6*Fibonacci[Range[2,500]]-1,AllTrue[#+{0,2},PrimeQ]&] (* _Harvey P. Dale_, Apr 18 2025 *) %o A321792 (PARI) %o A321792 for (n=2, 1000, if (ispseudoprime (p=6*fibonacci(n)-1) && ispseudoprime (p+2), print1(p", "))) %Y A321792 Cf. A001359 (lesser of twin primes). %K A321792 nonn,more %O A321792 1,1 %A A321792 _Gilbert Mozzo_, Jan 12 2019