A158722 Primes p which are not in A158720 and A158721.

3, 7, 11, 19, 29, 37, 41, 43, 47, 61, 71, 79, 83, 89, 97, 101, 107, 109, 127, 131, 137, 139, 151, 157, 163, 173, 191, 199, 223, 227, 229, 239, 241, 251, 257, 263, 271, 277, 281, 283, 293, 311, 313, 317, 331, 349, 353, 367, 373, 379, 383, 389, 397, 401, 409, 419

Offset

1,1

Links

Table of n, a(n) for n=1..56.

Mathematica

lst={}; Do[p=Prime[n]; If[ !PrimeQ[Floor[p/3]+p]&&!PrimeQ[Ceiling[p/3]+p], AppendTo[lst, p]], {n, 5!}]; lst

Crossrefs

Cf. A158708, A158709, A158710, A158711, A158712, A158713, A158714, A158719, A158720, A158721

Sequence in context: A276456 A126254 A092102 * A202301 A339974 A123080

Adjacent sequences: A158719 A158720 A158721 * A158723 A158724 A158725

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Mar 24 2009

Status

approved