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 A079733 #7 Jul 15 2012 09:54:06 %S A079733 3,5,7,11,13,19,23,29,37,43,53,61,67,71,83,101,103,107,109,131,139, %T A079733 149,151,163,167,173,181,197,199,211,229,263,277,293,317,331,349,359, %U A079733 373,389,397,419,439,461,467,487,491,503,523,541,547,557,587,599,613,631,643,653 %N A079733 Primes of the form x^2 + y^2 + 3 (x,y nonnegative). %H A079733 Vincenzo Librandi, <a href="/A079733/b079733.txt">Table of n, a(n) for n = 1..1000</a> %t A079733 f[upto_]:=Module[{max=Ceiling[Sqrt[upto]]},Select[Select[Union[Total[#]+3&/@(Tuples[Range[0,max],{2}]^2)],PrimeQ],#<=upto&]];f[1200] (* _Vincenzo Librandi_, Jul 15 2012 *) %Y A079733 Cf. A079732, A079739, A079740. %K A079733 nonn %O A079733 1,1 %A A079733 _N. J. A. Sloane_, Feb 18 2003