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 A139489 #34 May 02 2024 19:03:30 %S A139489 101,137,677,1009,1493,1693,1697,1933,3137,3613,3637,3701,3821,4217, %T A139489 4261,4273,4289,4373,4457,4597,4861,5273,5441,5849,6029,6037,6473, %U A139489 6661,6689,7193,7253,7309,8377,8581,8609,8677,9337,9781,10133,10181,10433 %N A139489 Primes of the form x^2+101y^2. %H A139489 Vincenzo Librandi and Ray Chandler, <a href="/A139489/b139489.txt">Table of n, a(n) for n = 1..10000</a> [First 1000 terms from Vincenzo Librandi] %H A139489 N. J. A. Sloane et al., <a href="https://oeis.org/wiki/Binary_Quadratic_Forms_and_OEIS">Binary Quadratic Forms and OEIS</a> (Index to related sequences, programs, references) %t A139489 a = {}; w = 101; Do[Do[If[PrimeQ[n^2 + w*m^2], AppendTo[a, n^2 + w*m^2]], {n, 1, 700}], {m, 1, 200}]; Union[a] %t A139489 QuadPrimes2[1,0,101,11000] (* see A106856 *) %Y A139489 Cf. A139643-A139668. %Y A139489 See "Binary Quadratic Forms and OEIS" link for list of sequences of primes of the form x^2+ny^2. %K A139489 nonn %O A139489 1,1 %A A139489 _Artur Jasinski_, Apr 24 2008 %E A139489 101 term prepended by _T. D. Noe_, Nov 05 2009