OFFSET
1,1
COMMENTS
5+7+11=23(prime);11+13+17=41(prime),... prime(n)+prime(n-1)+prime(n-2) are primes and prime(n)+prime(n+1)+prime(n+2) are also primes.
MATHEMATICA
lst={}; Do[p0=Prime[n+0]; p1=Prime[n+1]; p2=Prime[n+2]; p3=Prime[n+3]; p4=Prime[n+4]; If[PrimeQ[p0+p1+p2]&&PrimeQ[p2+p3+p4], AppendTo[lst, p2]], {n, 6!}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Feb 15 2009
STATUS
approved