OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..1000
EXAMPLE
a(3) = 348 is a term because A014574(348) = 348-(2+2+3+29) = 312 and 348-1 = 347, 348+1 = 349, 312-1 = 311, and 312+1 = 313 are prime.
MAPLE
filter:= proc(n) local s, t;
if not isprime(n-1) or not isprime(n+1) then return false fi;
s:= add(t[1]*t[2], t= ifactors(n)[2]);
isprime(n-s-1) and isprime(n-s+1)
end proc:
select(filter, [seq(i, i=6..10^6, 2)]);
CROSSREFS
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Jan 11 2021
STATUS
approved