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 A099775 #16 Dec 19 2019 05:48:16 %S A099775 29,71,137,317,431,661,1511,3121,3593,4751,6551,8627,9791,11657,16631, %T A099775 19037,36857,41983,51977,55681,57593,72893,82913,95471,116933,123191, %U A099775 159191,194471,198901,205187,210671,233267,256021,272477,324893,364801 %N A099775 Primes of the form pq - 6, where p and q are consecutive primes. %C A099775 Primes of the form prime(k)*prime(k+1) - 6 for some k >= 1. - _Jon E. Schoenfield_, Jan 17 2015 %H A099775 Amiram Eldar, <a href="/A099775/b099775.txt">Table of n, a(n) for n = 1..10000</a> %e A099775 11*13 - 6 = 137 is prime. %t A099775 f[n_]:=Prime[n]*Prime[n+1]-6; lst={}; Do[If[PrimeQ[f[n]],AppendTo[lst,f[n]]],{n,6!}]; lst (* _Vladimir Joseph Stephan Orlovsky_, Feb 10 2010 *) %o A099775 (PARI) p=2;forprime(q=3,610,if(isprime(u=p*q-6),print1(u,","));p=q) %o A099775 (PARI) forprime(p=2,1000, q=nextprime(p+1); r=p*q-6; if(isprime(r),print1(r,","))) \\ _Rick L. Shepherd_, Nov 13 2004 %Y A099775 Cf. A092761. %K A099775 nonn %O A099775 1,1 %A A099775 _Giovanni Teofilatto_, Nov 12 2004 %E A099775 Edited and extended by _Klaus Brockhaus_ and _Rick L. Shepherd_, Nov 13 2004