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 A158723 #3 Mar 31 2012 12:38:21
%S A158723 13,31,73,103,181,193,433,463,571,643,661,823,1021,1291,1621,1723,
%T A158723 2083,2143,2341,2593,2713,3001,3253,3331,3361,3541,4231,4243,4423,
%U A158723 4933,5233,5653,5881,6553,6571,6781,6871,6961,7951,8293,9283,9343,9433,9631,9931
%N A158723 Greater of twin primes in A158720.
%C A158723 If prime number from sequence A158720 is twin prime, it always (?) Greater of twin primes, and none (?) of Lesser of twin primes.
%t A158723 lst={};Do[p=Prime[n];If[PrimeQ[Floor[p/3]+p],If[PrimeQ[p-2],AppendTo[lst,p]]],{n,7!}];lst
%Y A158723 Cf. A158708, A158709, A158710, A158711, A158712, A158713, A158714, A158719, A158720, A158721, A158722
%K A158723 nonn
%O A158723 1,1
%A A158723 _Vladimir Joseph Stephan Orlovsky_, Mar 24 2009