A157929 Numbers n such that n^2+4, n^2+8, and n^2+10 are prime.

3, 57, 1203, 2307, 3837, 3843, 4227, 4257, 5277, 7053, 7473, 9933, 10893, 11487, 12603, 23223, 32397, 44037, 44517, 46893, 48327, 48693, 52083, 52923, 54813, 55647, 61827, 61977, 62493, 71733, 71793, 77097, 81837, 97383, 98487, 98853, 99393, 102117, 102753, 109617, 112347

Offset: 1

Author

Vincenzo Librandi, Dec 16 2010

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..200

Crossrefs

Cf. A086220.

Programs

Magma

[n: n in [0..150000]|IsPrime(n^2+4) and IsPrime(n^2+8) and IsPrime(n^2+10)]

Mathematica

Select[Range[112347], PrimeQ[#^2+4] && PrimeQ[#^2+8] && PrimeQ[#^2+10]&]
Select[Range[120000],AllTrue[#^2+{4,8,10},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jan 09 2016 *)