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 A160548 #66 Feb 16 2025 08:33:10
%S A160548 844427,844429,844433,844439,844447,844457,844469,844483,844499,
%T A160548 844517,844609,844733,844769,844847,845027,845129,845183,845357,
%U A160548 845833,845909,845987,846067,846149,846233,846407,846589,846779,846877,846977,847079,847507,847967,848087
%N A160548 Primes of the form k^2 + k + 844427.
%C A160548 844427 is the fourth term of A190800 and of A191456. - _Arkadiusz Wesolowski_, Jun 25 2011
%H A160548 Vincenzo Librandi and Arkadiusz Wesolowski, <a href="/A160548/b160548.txt">Table of n, a(n) for n = 1..10000</a> (the first 210 terms are from Vincenzo Librandi)
%H A160548 G. L. Honaker, Jr. and Chris Caldwell, <a href="https://t5k.org/curios/cpage/18609.html">Prime Curios! 844427</a>
%H A160548 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Prime-GeneratingPolynomial.html">Prime-Generating Polynomial</a>
%t A160548 Select[Table[n^2 + n + 844427, {n, 0, 60}], PrimeQ] (* _Arkadiusz Wesolowski_, Mar 04 2011 *)
%o A160548 (Magma) [n^2+n+844427 : n in [0..60] | IsPrime(n^2+n+844427)]; // _Bruno Berselli_, Feb 23 2011
%o A160548 (PARI) for(n=0, 60, if(isprime(x=(n^2+n+844427)), print1(x, ", "))); \\ _Arkadiusz Wesolowski_, Mar 02 2011
%o A160548 (PARI) select(isprime, vector(1000, n, n^2+n+844427)) \\ _Charles R Greathouse IV_, Feb 23 2011
%Y A160548 Cf. A005846, A007635, A048059, A190800, A191456.
%K A160548 nonn
%O A160548 1,1
%A A160548 _Arkadiusz Wesolowski_, May 18 2009