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 A158720 #2 Mar 31 2012 12:38:20
%S A158720 2,13,31,67,73,103,181,193,211,307,337,433,463,571,577,607,643,661,
%T A158720 733,757,787,823,937,967,991,1021,1117,1201,1291,1567,1597,1621,1723,
%U A158720 1783,1831,1993,2017,2083,2143,2251,2281,2287,2341,2377,2521,2593,2647,2713
%N A158720 Primes p such that Floor[p/3]+p is prime.
%C A158720 Floor[13/3]+13=17, ...
%t A158720 lst={};Do[p=Prime[n];If[PrimeQ[Floor[p/3]+p],AppendTo[lst,p]],{n,6!}];lst
%Y A158720 Cf. A158708, A158709, A158710, A158711, A158712, A158713, A158714, A158719
%K A158720 nonn
%O A158720 1,1
%A A158720 _Vladimir Joseph Stephan Orlovsky_, Mar 24 2009