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 A089526 #7 Nov 29 2014 15:15:11
%S A089526 3,7,14,33,44,45,48,49,70,75,90,174,186,213,225,246,253,254,447,505,
%T A089526 524,531,589,592,625,665,745,766,806,866,868,989,1047,1084,1091,1105,
%U A089526 1131,1191,1202,1228,1257,1280,1333,1395,1410,1429,1495,1512,1550,1643,1651
%N A089526 Numbers n such that 2*p(n)+3 and 2*p(n+1)+3 are consecutive primes, where p(i) denotes the i-th prime.
%H A089526 Harvey P. Dale, <a href="/A089526/b089526.txt">Table of n, a(n) for n = 1..1000</a>
%e A089526 p(3)=5, 2*5+3=13=p(6)
%e A089526 p(4)=7, 2*7+3=17=p(7)
%t A089526 cpQ[n_]:=Module[{p=2Prime[n]+3},PrimeQ[p]&&NextPrime[p]==2Prime[n+1]+3]; Select[Range[1700],cpQ] (* _Harvey P. Dale_, Nov 29 2014 *)
%Y A089526 Subsequence of A089530. Cf. A089527, A089528, A089529.
%K A089526 nonn
%O A089526 1,1
%A A089526 _Ray Chandler_, Nov 07 2003