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 A058043 #15 Jul 04 2018 06:21:48 %S A058043 2,4,4,6,6,6,6,4,4,14,10,6,4,4,6,10,14,8,4,4,8,18,6,12,4,6,14,14,20, %T A058043 14,10,4,10,6,6,6,8,12,4,24,18,14,16,10,16,6,12,12,26,16,8,16,8,14,16, %U A058043 22,10,22,14,8,14,22,6,10,8,10,16,24,14,12,10,10,6,16,30,12,10,18,24,10 %N A058043 a(n) = nextprime(n^2) - prevprime(n^2). %H A058043 Alois P. Heinz, <a href="/A058043/b058043.txt">Table of n, a(n) for n = 2..10000</a> %e A058043 6^2=36 is immediately preceded and followed by 31 and 37, of which 6 is the difference. %p A058043 [seq(nextprime(i^2)-prevprime(i^2),i=2..1000)]; %t A058043 Table[n2=n^2;(NextPrime[n2]-NextPrime[n2,-1]),{n,2,100}] (* _Vladimir Joseph Stephan Orlovsky_, Mar 09 2011 *) %o A058043 (PARI) A058043(n) = nextprime(n^2)-prime(primepi(n^2)) \\ _Michael B. Porter_, Feb 09 2010 %K A058043 nonn %O A058043 2,1 %A A058043 _Labos Elemer_, Nov 17 2000