A210504 Numbers n for which 2*n+5, 4*n+5, 6*n+5, and 8*n+5 are primes.

0, 3, 6, 21, 24, 48, 63, 126, 213, 237, 297, 318, 402, 609, 657, 714, 783, 864, 948, 1053, 1287, 1347, 1449, 1581, 1683, 2166, 2184, 2358, 2457, 2463, 2481, 2736, 2793, 2898, 2919, 3024, 3723, 3786, 3909, 4017, 4479, 4584, 4602, 4857, 5169, 5634, 5733, 7101

Offset: 0

Author

Vladimir Shevelev and Peter J. C. Moses, Jan 25 2013

Keywords

• nonn

Comments

All terms are multiple of 3.

Links

• Harvey P. Dale, Table of n, a(n) for n = 0..1000

Crossrefs

Cf. A115334.

Programs

Mathematica

Select[Range[0, 10000], PrimeQ[2*# + 5] && PrimeQ[4*# + 5] && PrimeQ[6*# + 5] && PrimeQ[ 8*# + 5] &] (* T. D. Noe, Jan 25 2013 *)
Select[Range[0,8000],AllTrue[#{2,4,6,8}+5,PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jan 14 2016 *)