A141280 Primes p such that p-6^3, p-6^2, p-6, p, p+6, p+6^2 and p+6^3 are primes.

233, 353, 977, 1663, 2693, 4457, 5443, 11933, 20107, 23333, 23893, 41263, 108923, 110813, 294347, 554633, 730783, 748603, 851387, 928643, 1005013, 1008193, 1020043, 1150873, 1194763, 1326313, 1427963, 1477103, 2161337, 2212003

Offset

1,1

Comments

Subsequence of A006489 and A141279. A141281 is a subsequence.

Links

Rick L. Shepherd, Table of n, a(n) for n = 1..1000

Mathematica

p6Q[n_]:=With[{c=6^Range[3]}, AllTrue[Join[n+c, n-c], PrimeQ]]; Select[ Prime[ Range[ 50, 200000]], p6Q] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jun 06 2015 *)

Crossrefs

Cf. A006489, A141279, A141281, A141282.

Sequence in context: A105981 A160574 A087862 * A097446 A154621 A243891

Adjacent sequences: A141277 A141278 A141279 * A141281 A141282 A141283

Keyword

nonn

Author

Rick L. Shepherd, Jun 21 2008

Status

approved