A054828 First term of weak prime sextet: p(m+1)-p(m) < p(m+2)-p(m+1) < p(m+3)-p(m+2) < p(m+4)-p(m+3) < p(m+5)-p(m+4).

2903, 13463, 13901, 14947, 15373, 15377, 21397, 21557, 21859, 28277, 30869, 33199, 35591, 37691, 42221, 42569, 45821, 55661, 64661, 64919, 64921, 68207, 68209, 68897, 68899, 73939, 74201, 78577, 83089, 85513, 87313, 88001, 90907

Offset: 1

Author

Henry Bottomley, Apr 10 2000

Keywords

• nonn

Links

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

Crossrefs

Cf. A051635, A054800-A054840.

Programs

Mathematica

Transpose[Select[Partition[Prime[Range[9000]],6,1],AllTrue[ Differences[ #,2], Positive]&]] [[1]] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Dec 12 2014 *)