A086136 Primes p such that p and p+12 are nonconsecutive primes.

5, 7, 11, 17, 19, 29, 31, 41, 47, 59, 61, 67, 71, 89, 97, 101, 127, 137, 139, 151, 167, 179, 181, 227, 229, 239, 251, 257, 269, 271, 281, 337, 347, 367, 389, 397, 409, 419, 421, 431, 449, 479, 487, 491, 557, 587, 601, 607, 631, 641, 647, 727, 739, 757, 761, 809

Offset

1,1

Comments

This sequence differs from A046133 because here the terms of A031930 are missing.

Complement of a=A031930 with respect to b=A046133: [b] & [not a]: this and A031930 are disjoint, but A031930 is a proper subset of A046133.

Links

Jonathan Frech, Table of n, a(n) for n = 1..1000

Example

First two deviations from A046133 are that 199=A031930(1) and 211=A031930(2) are missing. First 20 terms are equal.

Mathematica

Do[s=Prime[n]; s1=Prime[n+1]; If[PrimeQ[s+d]&& !Equal[s1-s, d], Print[s]], {n, 1, 1000}]; d=12
ncpQ[n_]:=Module[{c=n+12}, PrimeQ[c]&&NextPrime[n]!=c]; Select[Prime[ Range[ 150]], ncpQ] (* Harvey P. Dale, May 03 2012 *)

Crossrefs

Cf. A031930, A046133.

Sequence in context: A056775 A015917 A046133 * A136052 A301913 A110587

Adjacent sequences: A086133 A086134 A086135 * A086137 A086138 A086139

Keyword

nonn

Author

Labos Elemer, Jul 28 2003

Status

approved