

A229765


Numbers p such that p, p + 4, p + 10, p + 18, p + 28, p + 40, p + 54, p + 70, p + 88, p + 108 are all prime.


1



19, 43, 223, 8123233, 50137123, 71732953, 169973719, 180078319, 351869029, 1034200459, 1278189949, 1614656959, 1761702949, 1829187289, 1924594999, 2804764213, 3255458029, 3468214093, 3766062889, 3802453873, 3894167989, 4894485133, 5862143449, 6145800823
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

With contributions from Harvey P. Dale and Charles R Greathouse IV.


LINKS

Zak Seidov and Donovan Johnson, Table of n, a(n) for n = 1..500 (first 36 terms from Zak Seidov)


MATHEMATICA

Select[Prime[Range[2861*10^5]], AllTrue[#+{4, 10, 18, 28, 40, 54, 70, 88, 108}, PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jan 21 2019 *)


CROSSREFS

Sequence in context: A205533 A185167 A140619 * A058829 A063313 A044096
Adjacent sequences: A229762 A229763 A229764 * A229766 A229767 A229768


KEYWORD

nonn


AUTHOR

Zak Seidov, Sep 28 2013


STATUS

approved



