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 A145024 #6 Mar 31 2012 12:38:16
%S A145024 3,13,21,3,7,8,1,18,29,5,3,8,11,31,4,20,3,7,5,19,21,32,1,19,48,19,29,
%T A145024 32,7,38,1,43,12,33,46,6,16,8,4,34,15,1,19,7,1,23,28,30,22,8,1,7,1,52,
%U A145024 14,56,10,26,2,30,65,5,71,12,44,39,37,6,19,47,11,10,21,7,11,4,62,7,4,8,1
%N A145024 Number of primes between successive balanced primes (A006562).
%t A145024 BalancedPrimeQ[n_]:=Prime[n+1]-Prime[n]==Prime[n]-Prime[n-1]; lst={}; a=1; Do[If[BalancedPrimeQ[n], i=PrimePi[p=Prime[n]]-PrimePi[a]; AppendTo[lst,i]; a=p],{n,2,5000}]; lst
%K A145024 nonn
%O A145024 1,1
%A A145024 _Vladimir Joseph Stephan Orlovsky_, Sep 29 2008