A140557 Primes p such that p + 14 is composite.

2, 7, 11, 13, 19, 31, 37, 41, 43, 61, 67, 71, 73, 79, 97, 101, 103, 107, 109, 127, 131, 139, 151, 157, 163, 173, 181, 191, 193, 199, 211, 223, 229, 233, 239, 241, 251, 271, 277, 281, 283, 307, 311, 313, 331, 337, 347, 349, 367, 373, 379, 389, 397, 401, 409, 421

Offset: 1

Author

Juri-Stepan Gerasimov, Jul 03 2008, Aug 15 2009

Keywords

• nonn
• easy
• less

Programs

Magma

[p: p in PrimesUpTo(500)|not IsPrime(p+14)]; // Vincenzo Librandi, Dec 18 2010

Mathematica

Select[Prime[Range[100]],!PrimeQ[#+14]&] (* Harvey P. Dale, Jun 13 2011 *)

Extensions

Edited by Charles R Greathouse IV, Mar 24 2010