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 A137919 #7 Apr 15 2015 15:49:07 %S A137919 3,3,1,4,7,5,3,1,6,1,3,5,1,3,4,3,4,1,4,4,3,9,5,3,1,6,3,6,5,4,4,4,5,5, %T A137919 7,7,10,4,4,7,4,6,1,5,9,3,3,1,5,4,3,6,9,3,1,17,3,9,7,4,6,1,6,6,4,7,1, %U A137919 5,10,12,5,5,3,9,6,4,7,1,6,9,8,11,3,3,7,3,1,1,3,4,12,3,8,8,4,6,11,3,3,6,7,6 %N A137919 (Nextprime(24n)-previousprime(24n))/2. %C A137919 a(n)=1 if 24n -/+ 1 are twin primes. %C A137919 Corresponding n's are in A137920. %t A137919 Table[(NextPrime[24n]-NextPrime[24n,-1])/2,{n,110}] (* _Harvey P. Dale_, Apr 15 2015 *) %o A137919 (PARI) a(n) = (nextprime(24*n) - precprime(24*n))/2; \\ _Michel Marcus_, Oct 13 2013 %Y A137919 Cf. A124519, A135023, A135368, A137876, A137877, A137920. %K A137919 nonn %O A137919 1,1 %A A137919 _Zak Seidov_, Feb 23 2008