The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A086136 Primes p such that p and p+12 are nonconsecutive primes. 2

%I

%S 5,7,11,17,19,29,31,41,47,59,61,67,71,89,97,101,127,137,139,151,167,

%T 179,181,227,229,239,251,257,269,271,281,337,347,367,389,397,409,419,

%U 421,431,449,479,487,491,557,587,601,607,631,641,647,727,739,757,761,809

%N Primes p such that p and p+12 are nonconsecutive primes.

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

%C 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.

%H Jonathan Frech, <a href="/A086136/b086136.txt">Table of n, a(n) for n = 1..1000</a>

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

%t Do[s=Prime[n]; s1=Prime[n+1]; If[PrimeQ[s+d]&& !Equal[s1-s, d], Print[s]], {n, 1, 1000}]; d=12

%t ncpQ[n_]:=Module[{c=n+12},PrimeQ[c]&&NextPrime[n]!=c]; Select[Prime[ Range[ 150]],ncpQ] (* _Harvey P. Dale_, May 03 2012 *)

%Y Cf. A031930, A046133.

%K nonn

%O 1,1

%A _Labos Elemer_, Jul 28 2003

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 18 13:31 EST 2021. Contains 340254 sequences. (Running on oeis4.)