A155142 Primes p that belong neither to A155140 nor to A155141.

5, 13, 23, 29, 31, 41, 53, 59, 67, 71, 79, 103, 113, 131, 139, 149, 151, 157, 167, 173, 179, 193, 211, 229, 239, 241, 257, 271, 283, 311, 337, 359, 367, 373, 379, 383, 401, 409, 419, 421, 463, 479, 491, 499, 503, 509, 521, 563, 599, 601, 607, 617, 641, 643

Offset

1,1

Links

John Cerkan, Table of n, a(n) for n = 1..10000

Mathematica

<<NumberTheory`NumberTheoryFunctions` lst={}; Do[p=Prime[n]; If[SquareFreeQ[p-4]&&SquareFreeQ[p+4], NULL, If[ !SquareFreeQ[p-4]&&!SquareFreeQ[p+4], NULL, AppendTo[lst, p]]], {n, 6!}]; lst

Crossrefs

Cf. A153213, A049282, A155139, A155140, A155141.

Sequence in context: A174172 A076408 A006353 * A377179 A155552 A219546

Adjacent sequences: A155139 A155140 A155141 * A155143 A155144 A155145

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jan 21 2009

Status

approved