%I #6 Oct 22 2013 10:57:36
%S 257,1747,3307,5107,5387,6317,6367,12647,13457,14747,15797,15907,
%T 17477,18217,19477,23327,26177,30097,30637,53617,56087,62207,63697,
%U 71347,74471,75527,76561,77557,78797,80917,82787,83437,84437,89107,89387
%N Second term of balanced prime quartets: p(m)-p(m-1) = p(m+1)-p(m) = p(m+2)-p(m+1).
%H Harvey P. Dale, <a href="/A054801/b054801.txt">Table of n, a(n) for n = 1..1000</a>
%t Transpose[Select[Partition[Prime[Range[9000]],4,1],Length[ Union[ Differences[#]]] == 1&]][[2]] (* _Harvey P. Dale_, Oct 22 2013 *)
%Y Cf. A006562, A054800-A054840.
%K nonn
%O 1,1
%A _Henry Bottomley_, Apr 10 2000
|