OFFSET
1,1
MATHEMATICA
Select[Range[10^6], Function[n, AllTrue[Array[2 # n + (2 # + 1) &, 5], PrimeQ]]] (* Michael De Vlieger, Jan 20 2018 *)
PROG
(Magma) [n: n in [0..10000000]|IsPrime(2*n+3) and IsPrime(4*n+5) and IsPrime(6*n+7) and IsPrime(8*n+9) and IsPrime(10*n+11)] // Vincenzo Librandi, Dec 16 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Apr 16 2005
STATUS
approved