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 A346145 #16 Jul 07 2021 16:19:38 %S A346145 29,41,61,89,281,349,509,601,701,809,1049,1181,1321,1789,2141,2729, %T A346145 3389,4649,5209,5501,5801,8861,9241,9629,10429,11261,11689,12569, %U A346145 15401,15901,17449,17981,18521,19069,21341,21929,23741,24989,26921,27581,33149,39229,40829,41641,42461,45821,46681,52009 %N A346145 Primes of the form k^2 + 25. %C A346145 k^2 + 25 = (k+5i)*(k-5i), where i is the imaginary unit. %H A346145 Todor Szimeonov, <a href="https://newprimax.blogspot.com/2021/07/a-dramatic-encounter.html">A dramatic encounter</a> %F A346145 a(n) >> n log^2 n (Brun sieve). - _Charles R Greathouse IV_, Jul 06 2021 %t A346145 Select[Range[230]^2 + 25, PrimeQ] (* _Amiram Eldar_, Jul 06 2021 *) %o A346145 (PARI) list(lim)=my(v=List(),p); forstep(k=2,sqrtint(lim\1-25),2, if(isprime(p = k^2+25), listput(v,p))); Vec(v) \\ _Charles R Greathouse IV_, Jul 06 2021 %Y A346145 Cf. A002144, A002496, A005473, A138353, A243451. %K A346145 nonn %O A346145 1,1 %A A346145 _Todor Szimeonov_, Jul 06 2021