login
A210504
Numbers n for which 2*n+5, 4*n+5, 6*n+5, and 8*n+5 are primes.
2
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,2
COMMENTS
All terms are multiple of 3.
LINKS
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 *)
CROSSREFS
Cf. A115334.
Sequence in context: A260157 A101719 A173165 * A101582 A069558 A174461
KEYWORD
nonn
AUTHOR
STATUS
approved