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