OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
3*5 - 4 = 11 and 3*5 + 4 = 19.
5*7 - 6 = 29 and 5*7 + 6 = 41.
MATHEMATICA
lst={}; Do[If[PrimeQ[n-1]&&PrimeQ[n+1], If[PrimeQ[(n-1)*(n+1)-n]&&PrimeQ[(n-1)*(n+1)+n], AppendTo[lst, n]]], {n, 2*9!}]; lst
PROG
(Magma) [NthPrime(k)+1:k in [1..35000]|IsPrime(NthPrime(k)+2) and forall{s:s in [1+NthPrime(k), -1-NthPrime(k)]|IsPrime(NthPrime(k)*NthPrime(k+1)+s)}]; // Marius A. Burtea, Dec 22 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Jan 13 2009
STATUS
approved