A233318 Primes p such that p+6, p+12 and p+18 are composite.

2, 3, 197, 241, 283, 317, 359, 463, 499, 521, 547, 577, 617, 719, 773, 787, 829, 883, 887, 937, 967, 983, 1061, 1093, 1109, 1129, 1171, 1193, 1229, 1249, 1319, 1327, 1373, 1399, 1451, 1489, 1523, 1627, 1637, 1667, 1669, 1699, 1733, 1787, 1801, 1823, 1831, 1847

Offset

1,1

Comments

Subsequence of A233314 and A140555: a(3) = 197 = A233314(7) = A140555(19).

Links

Zak Seidov, Table of n, a(n) for n = 1..1000

Mathematica

Select[Prime[Range[400]], ! PrimeQ[# + 6] && ! PrimeQ[# + 12] && ! PrimeQ[# + 18] &] (* T. D. Noe, Dec 10 2013 *)
Select[Prime[Range[400]], AllTrue[#+{6, 12, 18}, CompositeQ]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 15 2019 *)

Crossrefs

Cf. A140555, A233314.

Sequence in context: A246488 A106715 A106817 * A231387 A160759 A191835

Adjacent sequences: A233315 A233316 A233317 * A233319 A233320 A233321

Keyword

nonn

Author

Zak Seidov, Dec 07 2013

Status

approved