OFFSET
1,1
COMMENTS
Numbers k such that A237885(k) > 0.
If k is not divisible by 3, then p or q must be 3.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(3) = 6 is a term because 2*6 = 12 = 5+7 with 5, 7, 5+2*7 = 19 and 2*5+7 = 17 all prime.
MAPLE
N:= 1000: # for terms <= N
S:= {}:
P:= select(isprime, [seq(i, i=3..2*N, 2)]):
nP:= nops(P):
for i from 1 to nP do
p:= P[i];
for j from i+1 to nP do
q:= P[j];
if p+q > 2*N then break fi;
r:= (p+q)/2;
if isprime(p+2*q) and isprime(2*p+q) then
S:= S union {r}
fi
od
od:
sort(convert(S, list));
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Israel, Jun 07 2022
STATUS
approved