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 A088296 #9 Mar 09 2020 09:13:57 %S A088296 1,2,1,4,1,5,1,5,7,4,5,7,2,1,7,4,11,8,7,2,11,13,5,7,14,1,5,7,16,13,1, %T A088296 5,14,4,13,8,1,7,19,2,13,10,20,19,11,8,17,1,16,11,23,20,10,17,1,7,11, %U A088296 13,8,22,5,7,16,11,26,2,25,19,5,7,23,13,25,8,19,1,26,20,17,10,19,14,5,7,23 %N A088296 Values of y - x, where x^2 + xy + y^2=p (x<y) is a prime of the form 6n + 1 (=A002476). %t A088296 Reap[For[n = 1, n <= 200, n++, If[PrimeQ[p = 6 n + 1], s = Solve[x^2 + x y + y^2 == p && 0 < x < y, {x, y}, Integers]; %t A088296 Sow[y - x /. s[[1]]]]]][[2, 1]] (* _Jean-François Alcover_, Mar 09 2020 *) %Y A088296 Cf. A002476, A088241, A088242, A088243, A088298, A088299, A088977. %K A088296 nonn %O A088296 1,2 %A A088296 _Lekraj Beedassy_, Nov 03 2003 %E A088296 More terms from _Ray Chandler_, Nov 04 2003