OFFSET
1,1
COMMENTS
Includes p if p, q = p+2, r = p+6, s = p+8 are consecutive primes and 2*p^2+19*p+28 is prime. The generalized Dickson's conjecture implies there are infinitely many such p.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(3) = 11 is a term because 11,13,17 and 19 are consecutive primes and 11+13*(17+19) = 479 is prime.
MAPLE
A:= NULL: q:= 2: r:= 3: s:= 5: count:= 0:
while count < 100 do
p:= q; q:= r; r:= s; s:= nextprime(s);
v:= p+q*(r+s);
if isprime(v) then A:= A, p; count:= count+1 fi
od:
A;
PROG
(Python)
from sympy import isprime, nextprime
def aupto(limit):
p, q, r, s, alst = 2, 3, 5, 7, []
while p <= limit:
if isprime(p + q*(r+s)): alst.append(p)
p, q, r, s = q, r, s, nextprime(s)
return alst
print(aupto(2161)) # Michael S. Branicky, Apr 15 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Apr 15 2021
STATUS
approved