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 A163387 #5 Dec 18 2015 15:08:59
%S A163387 11,17,41,53,59,89,137,167,251,263,269,431,467,563,599,677,683,809,
%T A163387 857,1061,1109,1181,1223,1259,1277,1319,1361,1523,1607,1889,1931,1949,
%U A163387 2111,2237,2393,2399,2741,3251,3371,3617,3821,3833,3881,4133,4217,4373,4679
%N A163387 Primes p such that 5(p-5)-1 and 5(p-5)+1 are twin primes.
%C A163387 In other words, primes p such that 5*(p-5) is member of A014574. [From _Omar E. Pol_, Aug 05 2009]
%H A163387 Harvey P. Dale, <a href="/A163387/b163387.txt">Table of n, a(n) for n = 1..1000</a>
%e A163387 5*(11-5)=30, 5*(17-5)=60,...
%t A163387 f1[n_]:=If[PrimeQ[n-1]&&PrimeQ[n+1],True,False]; f2[n_]:=If[f1[n]&&PrimeQ[n/5+5],True,False]; lst={};Do[If[f2[n],AppendTo[lst,n/5+5]],{n,8!}];lst
%t A163387 Select[Prime[Range[700]],AllTrue[5(#-5)+{1,-1},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Dec 18 2015 *)
%Y A163387 Cf. A163385, A163386
%Y A163387 Cf. A014574, A163388 [From _Omar E. Pol_, Aug 05 2009]
%K A163387 nonn,easy
%O A163387 1,1
%A A163387 _Vladimir Joseph Stephan Orlovsky_, Jul 25 2009
%E A163387 Definition clarified by _Omar E. Pol_, Aug 05 2009