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 A107145 #22 Sep 08 2022 08:45:18 %S A107145 41,89,241,281,401,409,449,521,569,601,641,761,769,809,881,929,1009, %T A107145 1049,1129,1201,1249,1289,1321,1361,1409,1481,1489,1601,1609,1721, %U A107145 1801,1889,2081,2089,2129,2161,2281,2441,2521,2609,2689,2729,2801 %N A107145 Primes of the form x^2 + 40y^2. %C A107145 Discriminant = -160. See A107132 for more information. %H A107145 Vincenzo Librandi and Ray Chandler, <a href="/A107145/b107145.txt">Table of n, a(n) for n = 1..10000</a> [First 1000 terms from Vincenzo Librandi] %H A107145 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) %F A107145 The primes are congruent to {1, 9} (mod 40). - _T. D. Noe_, Apr 29 2008 %t A107145 QuadPrimes2[1, 0, 40, 10000] (* see A106856 *) %o A107145 (Magma) [ p: p in PrimesUpTo(3000) | p mod 40 in {1, 9} ]; // _Vincenzo Librandi_, Jul 24 2012 %o A107145 (PARI) list(lim)=my(v=List(),t); forprime(p=41,lim, t=p%40; if(t==1||t==9, listput(v,p))); Vec(v) \\ _Charles R Greathouse IV_, Feb 09 2017 %Y A107145 Cf. A139643. %K A107145 nonn,easy %O A107145 1,1 %A A107145 _T. D. Noe_, May 13 2005