This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A086136 #21 Oct 21 2020 22:51:41 %S A086136 5,7,11,17,19,29,31,41,47,59,61,67,71,89,97,101,127,137,139,151,167, %T A086136 179,181,227,229,239,251,257,269,271,281,337,347,367,389,397,409,419, %U A086136 421,431,449,479,487,491,557,587,601,607,631,641,647,727,739,757,761,809 %N A086136 Primes p such that p and p+12 are nonconsecutive primes. %C A086136 This sequence differs from A046133 because here the terms of A031930 are missing. %C A086136 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 A086136 Jonathan Frech, <a href="/A086136/b086136.txt">Table of n, a(n) for n = 1..1000</a> %e A086136 First two deviations from A046133 are that 199=A031930(1) and 211=A031930(2) are missing. First 20 terms are equal. %t A086136 Do[s=Prime[n]; s1=Prime[n+1]; If[PrimeQ[s+d]&& !Equal[s1-s, d], Print[s]], {n, 1, 1000}]; d=12 %t A086136 ncpQ[n_]:=Module[{c=n+12},PrimeQ[c]&&NextPrime[n]!=c]; Select[Prime[ Range[ 150]],ncpQ] (* _Harvey P. Dale_, May 03 2012 *) %Y A086136 Cf. A031930, A046133. %K A086136 nonn %O A086136 1,1 %A A086136 _Labos Elemer_, Jul 28 2003