login
A160548
Primes of the form k^2 + k + 844427.
5
844427, 844429, 844433, 844439, 844447, 844457, 844469, 844483, 844499, 844517, 844609, 844733, 844769, 844847, 845027, 845129, 845183, 845357, 845833, 845909, 845987, 846067, 846149, 846233, 846407, 846589, 846779, 846877, 846977, 847079, 847507, 847967, 848087
OFFSET
1,1
COMMENTS
844427 is the fourth term of A190800 and of A191456. - Arkadiusz Wesolowski, Jun 25 2011
LINKS
Vincenzo Librandi and Arkadiusz Wesolowski, Table of n, a(n) for n = 1..10000 (the first 210 terms are from Vincenzo Librandi)
G. L. Honaker, Jr. and Chris Caldwell, Prime Curios! 844427
Eric Weisstein's World of Mathematics, Prime-Generating Polynomial
MATHEMATICA
Select[Table[n^2 + n + 844427, {n, 0, 60}], PrimeQ] (* Arkadiusz Wesolowski, Mar 04 2011 *)
PROG
(Magma) [n^2+n+844427 : n in [0..60] | IsPrime(n^2+n+844427)]; // Bruno Berselli, Feb 23 2011
(PARI) for(n=0, 60, if(isprime(x=(n^2+n+844427)), print1(x, ", "))); \\ Arkadiusz Wesolowski, Mar 02 2011
(PARI) select(isprime, vector(1000, n, n^2+n+844427)) \\ Charles R Greathouse IV, Feb 23 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved